radium> 'sequencer.scm already provided 
'seqblock_editor.scm already provided 
'seqblock_audio.scm already provided 
'mouse-primitives.scm already provided 
Warning: Redefining square #<lambda (x)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance-vertical #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-delta-place #<lambda (place delta-place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-place-from-y #<lambda (Button Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-place-from-y #<lambda* (Button Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-move-handlers* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-move-handler #<lambda* (move)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining run-mouse-move-handlers #<lambda (button x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle-front #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-mouse-cycle #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-new-seqblock? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-all-nodes? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-delta-mouse-handler #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-fx #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track-to-reltempo #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-note #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-pitchnum #<lambda (num tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-velocity-node #<lambda (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-fxnode #<lambda (fxnodenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-custom-seq-indicator #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-velocity-node #<lambda (velnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-fxnode #<lambda (fxnodenum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pitchnum #<lambda (pitchnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote-force #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-piano-ghost-note #<lambda (start end ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-force #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cancel-current-stuff #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining handling-nodes #<lambda (state thunk)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-press #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-move #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-release #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num-all-tracks* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-track-num! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-common-node-box #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node-horizontal #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node-horizontal #<lambda* ($x $get-node-box ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-node-handler-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-move-node-handler> #<lambda ({original}-12201 . {arguments}-12202)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-move-node-handler #<lambda ({original}-12201 . {arguments}-12202)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler-nokeywords #<lambda (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler #<lambda* (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining node-mouse-cycle-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-node-mouse-cycle> #<lambda ({original}-12211 . {arguments}-12212)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-node-mouse-cycle #<lambda ({original}-12211 . {arguments}-12212)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle-nokeywords #<lambda (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *move-existing-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *create-new-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-cycle-and-node #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-node-mouse-handler #<lambda* (Get-area-box Get-existing-node-info ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining editorautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-editorautomation-move> #<lambda ({original}-12239 . {arguments}-12240)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editorautomation-move #<lambda ({original}-12239 . {arguments}-12240)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move-nokeywords #<lambda (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move #<lambda* (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-horizontal-handler #<lambda* (Get-handler-data Get-x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqblock-info> #<lambda ({original}-12261 . {arguments}-12262)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqblock-info #<lambda ({original}-12261 . {arguments}-12262)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info2 #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info3 #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-selected-seqblock-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info2 #<lambda (seqtracknum X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-get-seqblock-info-from-current-seqautomation #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-call-me-after-curr-seqblock-under-mouse-has-been-called #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-info! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-BPMs #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-show-instrument-color-dialog #<lambda* (parentgui instrument-ids)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-instrument-color-dialog-for-all-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swingtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining centtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining chancetext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocitytext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining request-midi-channel #<lambda (now callback)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-editor-editor-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining track-configuration-popup-async #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-temponode-info> #<lambda ({original}-12321 . {arguments}-12322)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-temponode-info #<lambda ({original}-12321 . {arguments}-12322)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info-nokeywords #<lambda (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info #<lambda* (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-temponode-in-statusbar #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponodeval->01 #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining 01->temponodeval #<lambda (O1)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-temponode #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place-or-below #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-spans-last-place #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining todofunc #<lambda (funcname . $returnvalue)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pitchnum-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pitchnum-info> #<lambda ({original}-12331 . {arguments}-12332)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pitchnum-info #<lambda ({original}-12331 . {arguments}-12332)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info-nokeywords #<lambda (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info #<lambda* (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-pitchnum #<lambda (tracknum Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-pitch #<lambda* (pitchnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pianonote-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pianonote-info> #<lambda ({original}-12341 . {arguments}-12342)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pianonote-info #<lambda ({original}-12341 . {arguments}-12342)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info-nokeywords #<lambda (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info #<lambda* (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-y #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-box #<lambda ($blocknum $tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-move-type #<lambda ($y $y1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info4 #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info3 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining call-get-existing-node-info-callbacks #<lambda (callback info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-play-pianonote #<lambda (playing-note-pitch)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sane-pianonote-portamento-enabled #<lambda (pianonotenum noteid ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianonote #<lambda (pianonotenum move-type ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-key #<lambda (X)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-pianoroll-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-in-selection-rectangle? #<lambda (pitch1 place1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining select-notes-in-rectangle #<lambda (info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highlight-piano-note-under-mouse #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-ghost-note-values #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining display-ghost-note #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-pianoroll-help-window #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-popup-menu-common-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-eraser-pitches-and-places #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianoroll-eraser #<lambda ($button $dx ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-box #<lambda (Tracknum Notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-velocity-info> #<lambda ({original}-12357 . {arguments}-12358)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-velocity-info #<lambda ({original}-12357 . {arguments}-12358)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info-nokeywords #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info #<lambda* (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info2 #<lambda* (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-rating #<lambda (Y Vi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node #<lambda (num-nodes get-distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-velocity #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining trackwidth-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-trackwidth-info> #<lambda ({original}-12367 . {arguments}-12368)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-trackwidth-info #<lambda ({original}-12367 . {arguments}-12368)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info-nokeywords #<lambda (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info #<lambda* (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining may-be-a-resize-point-in-track #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-resize-point-track #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-trackwidth-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-box #<lambda (Tracknum FX-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fxnode-info> #<lambda ({original}-12377 . {arguments}-12378)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fxnode-info #<lambda ({original}-12377 . {arguments}-12378)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info-nokeywords #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info #<lambda* (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-infos #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-rating #<lambda (Y Fi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fx/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fx/distance> #<lambda ({original}-12387 . {arguments}-12388)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fx/distance #<lambda ({original}-12387 . {arguments}-12388)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance-nokeywords #<lambda (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance #<lambda* (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fxnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fx-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-fx/distance #<lambda (A B)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-fxnode #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-fxnodes #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-full-fx-name #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining realline-above-is-closest? #<lambda (top-realline bot-realline ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-curr-editor-beat #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-beat-or-bar-for-Y #<lambda (Y is-bar)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-from-X-Y #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-editor-beat/bar-range-operation #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-global-swing-track-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-bars-and-beats-or-line-numbers-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-time-tracks-popup-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clicked-seqblock-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-clicked-seqblock> #<lambda ({original}-12427 . {arguments}-12428)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-clicked-seqblock #<lambda ({original}-12427 . {arguments}-12428)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtemponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-value #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-automation-node #<lambda (nodenum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-nodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-highest-seqtemp-value #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqtemponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-statusbar-looppunch-info #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-highlighter #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handler #<lambda (base-name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handlers #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-timeline-looping? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock #<lambda (seqblock new-start-time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock2 #<lambda (seqblock delta-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtracknum #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining num-seqblocks-in-sequencer #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paint-grid! #<lambda (doit)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining only-select-one-seqblock #<lambda (dasseqblocknum dasseqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-gfx-gfx-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-num-visible-seqtracks-between #<lambda (a b)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-nth-visible-seqtrack #<lambda (seqtracknum n-goal)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-data-for-seqblock-moving #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-gfx-gfx-seqblocks #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining apply-gfx-gfx-seqblocks #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-sequencer-pixels-per-value-unit #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-fade-handler #<lambda (is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-seqblock-start-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-interior-pixels-per-value-unit #<lambda (seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-start #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-end #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-interior #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap-halfly? #<lambda* (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap? #<lambda* (seqblock1 seqblock2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-prev-seqblock-end #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-seqblock-start #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-is-overlapping-with-another-block-seqblock #<lambda* (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining auto-add-fades-to-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-add-auto-fades? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblocks-to-autofade #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-add-autofades #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration2 #<lambda (min-num-pixels)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-pos #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock-speedstretch #<lambda (Value seqtracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_set-seqblock-speedstretch #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqblock-speedstretch-handler #<lambda (is-stretch is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-popup-menu-entries #<lambda (seqblock-infos seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-playlist-popup-menu-for-seqblock #<lambda (seqblockid X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqblock-popup-menu #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-forward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-backward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-forward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-backward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swap-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining assert-seqblocks-state #<lambda (seqblocks)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sort-seqblocks-state #<lambda (seqblocks-state)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_move-single-block-class #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation/distance> #<lambda ({original}-12487 . {arguments}-12488)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation/distance #<lambda ({original}-12487 . {arguments}-12488)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance-nokeywords #<lambda (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance #<lambda* (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomationnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomation-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-seqautomation/distance #<lambda rest>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-1 #<lambda (Seqtracknum Nodenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation-0 #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation #<lambda (Seqtracknum Seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-and-highlight-current-seqautomation #<lambda (Button X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqnode-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-node-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-node> #<lambda ({original}-12503 . {arguments}-12504)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-node #<lambda ({original}-12503 . {arguments}-12504)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node-nokeywords #<lambda (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-nodes #<lambda (automationnum seqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-move> #<lambda ({original}-12513 . {arguments}-12514)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-move #<lambda ({original}-12513 . {arguments}-12514)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move-nokeywords #<lambda (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move #<lambda* (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqautomation-popup-menu #<lambda (mouse-x mouse-y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqblock-automation-node-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-nodes #<lambda (automationnum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-automation-node #<lambda (node-num automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining remove-seqblock-automation #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-selected? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-blocks-to-clipboard #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-copy-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-paste-sequencer-blocks #<lambda (seqtracknum time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-cut-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-update-seqblock-track-on-off-configuration #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-stretch #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-speed #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-width #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-move-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-topmost-seqtrack-from-navigator #<lambda (org-topmost dy)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
*************** WARNING! schemecodeparser: "*mouse-move-handlers*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 195
******* Note from mylint: Higher order function call detected for expression: '(move-handler button x y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 204 
*************** WARNING! schemecodeparser: "*mouse-cycles*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 210
******* Note from mylint: Higher order function call detected for expression: '(cycle :press-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 223...(suppressing rest)... 
*************** WARNING! schemecodeparser: "mouse-fx-has-been-set" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 403....(suppressing rest).....
******* Note from mylint: The function 'new-mouse-cycle' has the value '(get-mouse-cycle $button $x $y)', which looks suspicious. Expression: '(new-mouse-cycle :drag-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 617. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar625', which looks suspicious. Expression: '(Cycle :press)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar625', which looks suspicious. Expression: '(Cycle :move-and-release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar625', which looks suspicious. Expression: '(Cycle :release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Move' has the value '(Cycle-and-node :move)', which looks suspicious. Expression: '(Move Button Dx Dy Old-node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'Release' has the value '(Cycle-and-node :release)', which looks suspicious. Expression: '(Release Button X Y node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'area-box' has the value '(Node :area-box)', which looks suspicious. Expression: '(area-box :width)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1069. 
*************** NOTE: schemecodeparser: "node-info" has already been defined locally. Old: (schemecodeparser-define-var-type (Node :node-info)). New: (node-info schemecodeparser-define-var-type (Move-node node-info new-value (if Use-Place (if new-y (if Use-Grid-Place (get-place-from-y Button new-y) (ra:get-place-from-y new-y)) 'same-place) new-y)))/home/kjetil/radium/bin/scheme/mouse.scm: 1069....(suppressing rest).....
******* Note from mylint: The function 'new' has the value '(or (maybe-get-seqblock-info-from-current-seqautomation)
    (get-seqblock-info X Y))', which looks suspicious. Expression: '(new :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1332. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 1994. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes pitchinfonum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :place)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'move-func' has the value '(car move-func-and-pianonotenum)', which looks suspicious. Expression: '(move-func pianonotenum
           (if (ra:control-pressed)
               Value
               (round Value)) Place notenum
           *current-track-num*)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'func' has the value '(cond (move-start ra:move-pianonote-start)
      (move-end ra:move-pianonote-end)
      (move-all ra:move-pianonote)
      (else
       (if (not (and (list "UNKNOWN pianonote-info type: " move-type) #f))
           (handle-assertion '(and (list "UNKNOWN pianonote-info type: " move-type) #f) #t))))', which looks suspicious. Expression: '(func pianonotenum
      (if (not do-set-new-pitch)
          -1
          (+ delta-Value (get-note-value noteid pianonotenum)))
      (get-new-note-place noteid delta-Place) noteid tracknum blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2646. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value '(make-pianonote-info
  :blocknum (ra:current-block)
  :tracknum *current-track-num*
  :noteid #f
  :pianonotenum 0
  :move-type *pianonote-move-end*
  :mouse-delta 0
  :playing-note-id #f
  :playing-note-pitch #f
  :new-note #t
  :extra create-note)', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :x)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline bot-realline)', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4400. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline (between 0 (+ realline 1) (ra:get-num-reallines)))', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(if (< realline top-realline)
    (ra:get-beat-at-realline realline)
    (beats (- realline top-realline)))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'maybe' has the value '(if is-beat
    (ra:get-current-beat)
    (ra:get-current-bar))', which looks suspicious. Expression: '(maybe :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4704. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes (seqmove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6588. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6609. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7286. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7298. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock' has the value '(move-single :seqblock)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'mybox' has the value '(make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2) (ra:get-sequencer-y2))', which looks suspicious. Expression: '(mybox :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8041. 
******* Note from mylint: The function 'curr-dist' has the value '(and (inside-box? (make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2)
                             (ra:get-sequencer-y2))
                  X Y)
     (get-closest-seqautomation X Y))', which looks suspicious. Expression: '(curr-dist :distance)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8252. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8878. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9096. 
******* Note from mylint: The function 'box' has the value '(make-box2 (ra:get-seqnav-right-size-handle-x1) (ra:get-seqnav-right-size-handle-y1)
           (ra:get-seqnav-right-size-handle-x2) (ra:get-seqnav-right-size-handle-y2))', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
result: #t
radium> 'sequencer.scm already provided 
'seqblock_editor.scm already provided 
'seqblock_audio.scm already provided 
'mouse-primitives.scm already provided 
Warning: Redefining square #<lambda (x)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance-vertical #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-delta-place #<lambda (place delta-place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-place-from-y #<lambda (Button Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-place-from-y #<lambda* (Button Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-move-handlers* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-move-handler #<lambda* (move)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining run-mouse-move-handlers #<lambda (button x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle-front #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-mouse-cycle #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-new-seqblock? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-all-nodes? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-delta-mouse-handler #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-fx #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track-to-reltempo #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-note #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-pitchnum #<lambda (num tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-velocity-node #<lambda (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-fxnode #<lambda (fxnodenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-custom-seq-indicator #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-velocity-node #<lambda (velnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-fxnode #<lambda (fxnodenum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pitchnum #<lambda (pitchnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote-force #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-piano-ghost-note #<lambda (start end ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-force #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cancel-current-stuff #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining handling-nodes #<lambda (state thunk)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-press #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-move #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-release #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num-all-tracks* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-track-num! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-common-node-box #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node-horizontal #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node-horizontal #<lambda* ($x $get-node-box ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-node-handler-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-move-node-handler> #<lambda ({original}-15383 . {arguments}-15384)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-move-node-handler #<lambda ({original}-15383 . {arguments}-15384)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler-nokeywords #<lambda (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler #<lambda* (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining node-mouse-cycle-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-node-mouse-cycle> #<lambda ({original}-15393 . {arguments}-15394)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-node-mouse-cycle #<lambda ({original}-15393 . {arguments}-15394)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle-nokeywords #<lambda (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *move-existing-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *create-new-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-cycle-and-node #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-node-mouse-handler #<lambda* (Get-area-box Get-existing-node-info ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining editorautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-editorautomation-move> #<lambda ({original}-15421 . {arguments}-15422)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editorautomation-move #<lambda ({original}-15421 . {arguments}-15422)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move-nokeywords #<lambda (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move #<lambda* (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-horizontal-handler #<lambda* (Get-handler-data Get-x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqblock-info> #<lambda ({original}-15443 . {arguments}-15444)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqblock-info #<lambda ({original}-15443 . {arguments}-15444)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info2 #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info3 #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-selected-seqblock-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info2 #<lambda (seqtracknum X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-get-seqblock-info-from-current-seqautomation #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-call-me-after-curr-seqblock-under-mouse-has-been-called #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-info! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-BPMs #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-show-instrument-color-dialog #<lambda* (parentgui instrument-ids)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-instrument-color-dialog-for-all-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swingtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining centtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining chancetext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocitytext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining request-midi-channel #<lambda (now callback)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-editor-editor-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining track-configuration-popup-async #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-temponode-info> #<lambda ({original}-15503 . {arguments}-15504)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-temponode-info #<lambda ({original}-15503 . {arguments}-15504)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info-nokeywords #<lambda (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info #<lambda* (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-temponode-in-statusbar #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponodeval->01 #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining 01->temponodeval #<lambda (O1)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-temponode #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place-or-below #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-spans-last-place #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining todofunc #<lambda (funcname . $returnvalue)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pitchnum-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pitchnum-info> #<lambda ({original}-15513 . {arguments}-15514)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pitchnum-info #<lambda ({original}-15513 . {arguments}-15514)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info-nokeywords #<lambda (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info #<lambda* (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-pitchnum #<lambda (tracknum Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-pitch #<lambda* (pitchnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pianonote-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pianonote-info> #<lambda ({original}-15523 . {arguments}-15524)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pianonote-info #<lambda ({original}-15523 . {arguments}-15524)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info-nokeywords #<lambda (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info #<lambda* (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-y #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-box #<lambda ($blocknum $tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-move-type #<lambda ($y $y1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info4 #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info3 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining call-get-existing-node-info-callbacks #<lambda (callback info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-play-pianonote #<lambda (playing-note-pitch)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sane-pianonote-portamento-enabled #<lambda (pianonotenum noteid ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianonote #<lambda (pianonotenum move-type ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-key #<lambda (X)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-pianoroll-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-in-selection-rectangle? #<lambda (pitch1 place1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining select-notes-in-rectangle #<lambda (info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highlight-piano-note-under-mouse #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-ghost-note-values #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining display-ghost-note #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-pianoroll-help-window #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-popup-menu-common-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-eraser-pitches-and-places #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianoroll-eraser #<lambda ($button $dx ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-box #<lambda (Tracknum Notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-velocity-info> #<lambda ({original}-15539 . {arguments}-15540)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-velocity-info #<lambda ({original}-15539 . {arguments}-15540)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info-nokeywords #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info #<lambda* (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info2 #<lambda* (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-rating #<lambda (Y Vi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node #<lambda (num-nodes get-distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-velocity #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining trackwidth-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-trackwidth-info> #<lambda ({original}-15549 . {arguments}-15550)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-trackwidth-info #<lambda ({original}-15549 . {arguments}-15550)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info-nokeywords #<lambda (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info #<lambda* (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining may-be-a-resize-point-in-track #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-resize-point-track #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-trackwidth-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-box #<lambda (Tracknum FX-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fxnode-info> #<lambda ({original}-15559 . {arguments}-15560)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fxnode-info #<lambda ({original}-15559 . {arguments}-15560)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info-nokeywords #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info #<lambda* (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-infos #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-rating #<lambda (Y Fi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fx/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fx/distance> #<lambda ({original}-15569 . {arguments}-15570)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fx/distance #<lambda ({original}-15569 . {arguments}-15570)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance-nokeywords #<lambda (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance #<lambda* (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fxnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fx-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-fx/distance #<lambda (A B)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-fxnode #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-fxnodes #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-full-fx-name #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining realline-above-is-closest? #<lambda (top-realline bot-realline ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-curr-editor-beat #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-beat-or-bar-for-Y #<lambda (Y is-bar)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-from-X-Y #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-editor-beat/bar-range-operation #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-global-swing-track-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-bars-and-beats-or-line-numbers-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-time-tracks-popup-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clicked-seqblock-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-clicked-seqblock> #<lambda ({original}-15609 . {arguments}-15610)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-clicked-seqblock #<lambda ({original}-15609 . {arguments}-15610)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtemponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-value #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-automation-node #<lambda (nodenum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-nodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-highest-seqtemp-value #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqtemponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-statusbar-looppunch-info #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-highlighter #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handler #<lambda (base-name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handlers #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-timeline-looping? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock #<lambda (seqblock new-start-time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock2 #<lambda (seqblock delta-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtracknum #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining num-seqblocks-in-sequencer #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paint-grid! #<lambda (doit)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining only-select-one-seqblock #<lambda (dasseqblocknum dasseqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-gfx-gfx-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-num-visible-seqtracks-between #<lambda (a b)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-nth-visible-seqtrack #<lambda (seqtracknum n-goal)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-data-for-seqblock-moving #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-gfx-gfx-seqblocks #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining apply-gfx-gfx-seqblocks #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-sequencer-pixels-per-value-unit #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-fade-handler #<lambda (is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-seqblock-start-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-interior-pixels-per-value-unit #<lambda (seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-start #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-end #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-interior #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap-halfly? #<lambda* (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap? #<lambda* (seqblock1 seqblock2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-prev-seqblock-end #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-seqblock-start #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-is-overlapping-with-another-block-seqblock #<lambda* (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining auto-add-fades-to-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-add-auto-fades? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblocks-to-autofade #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-add-autofades #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration2 #<lambda (min-num-pixels)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-pos #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock-speedstretch #<lambda (Value seqtracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_set-seqblock-speedstretch #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqblock-speedstretch-handler #<lambda (is-stretch is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-popup-menu-entries #<lambda (seqblock-infos seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-playlist-popup-menu-for-seqblock #<lambda (seqblockid X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqblock-popup-menu #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-forward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-backward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-forward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-backward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swap-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining assert-seqblocks-state #<lambda (seqblocks)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sort-seqblocks-state #<lambda (seqblocks-state)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_move-single-block-class #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation/distance> #<lambda ({original}-15669 . {arguments}-15670)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation/distance #<lambda ({original}-15669 . {arguments}-15670)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance-nokeywords #<lambda (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance #<lambda* (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomationnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomation-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-seqautomation/distance #<lambda rest>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-1 #<lambda (Seqtracknum Nodenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation-0 #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation #<lambda (Seqtracknum Seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-and-highlight-current-seqautomation #<lambda (Button X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqnode-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-node-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-node> #<lambda ({original}-15685 . {arguments}-15686)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-node #<lambda ({original}-15685 . {arguments}-15686)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node-nokeywords #<lambda (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-nodes #<lambda (automationnum seqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-move> #<lambda ({original}-15695 . {arguments}-15696)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-move #<lambda ({original}-15695 . {arguments}-15696)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move-nokeywords #<lambda (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move #<lambda* (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqautomation-popup-menu #<lambda (mouse-x mouse-y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqblock-automation-node-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-nodes #<lambda (automationnum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-automation-node #<lambda (node-num automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining remove-seqblock-automation #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-selected? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-blocks-to-clipboard #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-copy-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-paste-sequencer-blocks #<lambda (seqtracknum time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-cut-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-update-seqblock-track-on-off-configuration #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-stretch #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-speed #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-width #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-move-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-topmost-seqtrack-from-navigator #<lambda (org-topmost dy)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
*************** WARNING! schemecodeparser: "*mouse-move-handlers*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 195
******* Note from mylint: Higher order function call detected for expression: '(move-handler button x y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 204 
*************** WARNING! schemecodeparser: "*mouse-cycles*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 210
******* Note from mylint: Higher order function call detected for expression: '(cycle :press-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 223...(suppressing rest)... 
*************** WARNING! schemecodeparser: "mouse-fx-has-been-set" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 403....(suppressing rest).....
******* Note from mylint: The function 'new-mouse-cycle' has the value '(get-mouse-cycle $button $x $y)', which looks suspicious. Expression: '(new-mouse-cycle :drag-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 617. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar823', which looks suspicious. Expression: '(Cycle :press)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar823', which looks suspicious. Expression: '(Cycle :move-and-release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar823', which looks suspicious. Expression: '(Cycle :release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Move' has the value '(Cycle-and-node :move)', which looks suspicious. Expression: '(Move Button Dx Dy Old-node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'Release' has the value '(Cycle-and-node :release)', which looks suspicious. Expression: '(Release Button X Y node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'area-box' has the value '(Node :area-box)', which looks suspicious. Expression: '(area-box :width)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1069. 
*************** NOTE: schemecodeparser: "node-info" has already been defined locally. Old: (schemecodeparser-define-var-type (Node :node-info)). New: (node-info schemecodeparser-define-var-type (Move-node node-info new-value (if Use-Place (if new-y (if Use-Grid-Place (get-place-from-y Button new-y) (ra:get-place-from-y new-y)) 'same-place) new-y)))/home/kjetil/radium/bin/scheme/mouse.scm: 1069....(suppressing rest).....
******* Note from mylint: The function 'new' has the value '(or (maybe-get-seqblock-info-from-current-seqautomation)
    (get-seqblock-info X Y))', which looks suspicious. Expression: '(new :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1332. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 1994. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes pitchinfonum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :place)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'move-func' has the value '(car move-func-and-pianonotenum)', which looks suspicious. Expression: '(move-func pianonotenum
           (if (ra:control-pressed)
               Value
               (round Value)) Place notenum
           *current-track-num*)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'func' has the value '(cond (move-start ra:move-pianonote-start)
      (move-end ra:move-pianonote-end)
      (move-all ra:move-pianonote)
      (else
       (if (not (and (list "UNKNOWN pianonote-info type: " move-type) #f))
           (handle-assertion '(and (list "UNKNOWN pianonote-info type: " move-type) #f) #t))))', which looks suspicious. Expression: '(func pianonotenum
      (if (not do-set-new-pitch)
          -1
          (+ delta-Value (get-note-value noteid pianonotenum)))
      (get-new-note-place noteid delta-Place) noteid tracknum blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2646. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value '(make-pianonote-info
  :blocknum (ra:current-block)
  :tracknum *current-track-num*
  :noteid #f
  :pianonotenum 0
  :move-type *pianonote-move-end*
  :mouse-delta 0
  :playing-note-id #f
  :playing-note-pitch #f
  :new-note #t
  :extra create-note)', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :x)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline bot-realline)', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4400. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline (between 0 (+ realline 1) (ra:get-num-reallines)))', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(if (< realline top-realline)
    (ra:get-beat-at-realline realline)
    (beats (- realline top-realline)))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'maybe' has the value '(if is-beat
    (ra:get-current-beat)
    (ra:get-current-bar))', which looks suspicious. Expression: '(maybe :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4704. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes (seqmove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6588. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6609. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7286. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7298. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock' has the value '(move-single :seqblock)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'mybox' has the value '(make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2) (ra:get-sequencer-y2))', which looks suspicious. Expression: '(mybox :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8041. 
******* Note from mylint: The function 'curr-dist' has the value '(and (inside-box? (make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2)
                             (ra:get-sequencer-y2))
                  X Y)
     (get-closest-seqautomation X Y))', which looks suspicious. Expression: '(curr-dist :distance)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8252. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8878. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9096. 
******* Note from mylint: The function 'box' has the value '(make-box2 (ra:get-seqnav-right-size-handle-x1) (ra:get-seqnav-right-size-handle-y1)
           (ra:get-seqnav-right-size-handle-x2) (ra:get-seqnav-right-size-handle-y2))', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
result: #t
radium> 'sequencer.scm already provided 
'seqblock_editor.scm already provided 
'seqblock_audio.scm already provided 
'mouse-primitives.scm already provided 
Warning: Redefining square #<lambda (x)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance-vertical #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-delta-place #<lambda (place delta-place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-place-from-y #<lambda (Button Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-place-from-y #<lambda* (Button Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-move-handlers* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-move-handler #<lambda* (move)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining run-mouse-move-handlers #<lambda (button x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle-front #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-mouse-cycle #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-new-seqblock? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-all-nodes? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-delta-mouse-handler #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-fx #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track-to-reltempo #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-note #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-pitchnum #<lambda (num tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-velocity-node #<lambda (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-fxnode #<lambda (fxnodenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-custom-seq-indicator #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-velocity-node #<lambda (velnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-fxnode #<lambda (fxnodenum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pitchnum #<lambda (pitchnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote-force #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-piano-ghost-note #<lambda (start end ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-force #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cancel-current-stuff #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining handling-nodes #<lambda (state thunk)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-press #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-move #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-release #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num-all-tracks* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-track-num! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-common-node-box #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node-horizontal #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node-horizontal #<lambda* ($x $get-node-box ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-node-handler-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-move-node-handler> #<lambda ({original}-18303 . {arguments}-18304)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-move-node-handler #<lambda ({original}-18303 . {arguments}-18304)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler-nokeywords #<lambda (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler #<lambda* (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining node-mouse-cycle-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-node-mouse-cycle> #<lambda ({original}-18313 . {arguments}-18314)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-node-mouse-cycle #<lambda ({original}-18313 . {arguments}-18314)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle-nokeywords #<lambda (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *move-existing-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *create-new-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-cycle-and-node #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-node-mouse-handler #<lambda* (Get-area-box Get-existing-node-info ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining editorautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-editorautomation-move> #<lambda ({original}-18341 . {arguments}-18342)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editorautomation-move #<lambda ({original}-18341 . {arguments}-18342)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move-nokeywords #<lambda (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move #<lambda* (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-horizontal-handler #<lambda* (Get-handler-data Get-x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqblock-info> #<lambda ({original}-18363 . {arguments}-18364)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqblock-info #<lambda ({original}-18363 . {arguments}-18364)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info2 #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info3 #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-selected-seqblock-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info2 #<lambda (seqtracknum X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-get-seqblock-info-from-current-seqautomation #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-call-me-after-curr-seqblock-under-mouse-has-been-called #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-info! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-BPMs #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-show-instrument-color-dialog #<lambda* (parentgui instrument-ids)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-instrument-color-dialog-for-all-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swingtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining centtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining chancetext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocitytext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining request-midi-channel #<lambda (now callback)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-editor-editor-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining track-configuration-popup-async #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-temponode-info> #<lambda ({original}-18423 . {arguments}-18424)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-temponode-info #<lambda ({original}-18423 . {arguments}-18424)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info-nokeywords #<lambda (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info #<lambda* (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-temponode-in-statusbar #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponodeval->01 #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining 01->temponodeval #<lambda (O1)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-temponode #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place-or-below #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-spans-last-place #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining todofunc #<lambda (funcname . $returnvalue)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pitchnum-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pitchnum-info> #<lambda ({original}-18433 . {arguments}-18434)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pitchnum-info #<lambda ({original}-18433 . {arguments}-18434)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info-nokeywords #<lambda (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info #<lambda* (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-pitchnum #<lambda (tracknum Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-pitch #<lambda* (pitchnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pianonote-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pianonote-info> #<lambda ({original}-18443 . {arguments}-18444)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pianonote-info #<lambda ({original}-18443 . {arguments}-18444)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info-nokeywords #<lambda (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info #<lambda* (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-y #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-box #<lambda ($blocknum $tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-move-type #<lambda ($y $y1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info4 #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info3 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining call-get-existing-node-info-callbacks #<lambda (callback info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-play-pianonote #<lambda (playing-note-pitch)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sane-pianonote-portamento-enabled #<lambda (pianonotenum noteid ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianonote #<lambda (pianonotenum move-type ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-key #<lambda (X)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-pianoroll-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-in-selection-rectangle? #<lambda (pitch1 place1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining select-notes-in-rectangle #<lambda (info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highlight-piano-note-under-mouse #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-ghost-note-values #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining display-ghost-note #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-pianoroll-help-window #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-popup-menu-common-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-eraser-pitches-and-places #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianoroll-eraser #<lambda ($button $dx ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-box #<lambda (Tracknum Notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-velocity-info> #<lambda ({original}-18459 . {arguments}-18460)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-velocity-info #<lambda ({original}-18459 . {arguments}-18460)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info-nokeywords #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info #<lambda* (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info2 #<lambda* (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-rating #<lambda (Y Vi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node #<lambda (num-nodes get-distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-velocity #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining trackwidth-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-trackwidth-info> #<lambda ({original}-18469 . {arguments}-18470)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-trackwidth-info #<lambda ({original}-18469 . {arguments}-18470)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info-nokeywords #<lambda (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info #<lambda* (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining may-be-a-resize-point-in-track #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-resize-point-track #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-trackwidth-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-box #<lambda (Tracknum FX-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fxnode-info> #<lambda ({original}-18479 . {arguments}-18480)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fxnode-info #<lambda ({original}-18479 . {arguments}-18480)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info-nokeywords #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info #<lambda* (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-infos #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-rating #<lambda (Y Fi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fx/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fx/distance> #<lambda ({original}-18489 . {arguments}-18490)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fx/distance #<lambda ({original}-18489 . {arguments}-18490)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance-nokeywords #<lambda (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance #<lambda* (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fxnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fx-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-fx/distance #<lambda (A B)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-fxnode #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-fxnodes #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-full-fx-name #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining realline-above-is-closest? #<lambda (top-realline bot-realline ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-curr-editor-beat #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-beat-or-bar-for-Y #<lambda (Y is-bar)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-from-X-Y #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-editor-beat/bar-range-operation #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-global-swing-track-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-bars-and-beats-or-line-numbers-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-time-tracks-popup-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clicked-seqblock-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-clicked-seqblock> #<lambda ({original}-18529 . {arguments}-18530)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-clicked-seqblock #<lambda ({original}-18529 . {arguments}-18530)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtemponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-value #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-automation-node #<lambda (nodenum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-nodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-highest-seqtemp-value #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqtemponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-statusbar-looppunch-info #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-highlighter #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handler #<lambda (base-name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handlers #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-timeline-looping? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock #<lambda (seqblock new-start-time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock2 #<lambda (seqblock delta-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtracknum #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining num-seqblocks-in-sequencer #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paint-grid! #<lambda (doit)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining only-select-one-seqblock #<lambda (dasseqblocknum dasseqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-gfx-gfx-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-num-visible-seqtracks-between #<lambda (a b)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-nth-visible-seqtrack #<lambda (seqtracknum n-goal)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-data-for-seqblock-moving #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-gfx-gfx-seqblocks #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining apply-gfx-gfx-seqblocks #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-sequencer-pixels-per-value-unit #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-fade-handler #<lambda (is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-seqblock-start-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-interior-pixels-per-value-unit #<lambda (seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-start #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-end #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-interior #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap-halfly? #<lambda* (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap? #<lambda* (seqblock1 seqblock2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-prev-seqblock-end #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-seqblock-start #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-is-overlapping-with-another-block-seqblock #<lambda* (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining auto-add-fades-to-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-add-auto-fades? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblocks-to-autofade #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-add-autofades #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration2 #<lambda (min-num-pixels)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-pos #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock-speedstretch #<lambda (Value seqtracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_set-seqblock-speedstretch #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqblock-speedstretch-handler #<lambda (is-stretch is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-popup-menu-entries #<lambda (seqblock-infos seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-playlist-popup-menu-for-seqblock #<lambda (seqblockid X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqblock-popup-menu #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-forward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-backward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-forward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-backward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swap-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining assert-seqblocks-state #<lambda (seqblocks)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sort-seqblocks-state #<lambda (seqblocks-state)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_move-single-block-class #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation/distance> #<lambda ({original}-18589 . {arguments}-18590)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation/distance #<lambda ({original}-18589 . {arguments}-18590)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance-nokeywords #<lambda (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance #<lambda* (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomationnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomation-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-seqautomation/distance #<lambda rest>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-1 #<lambda (Seqtracknum Nodenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation-0 #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation #<lambda (Seqtracknum Seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-and-highlight-current-seqautomation #<lambda (Button X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqnode-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-node-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-node> #<lambda ({original}-18605 . {arguments}-18606)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-node #<lambda ({original}-18605 . {arguments}-18606)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node-nokeywords #<lambda (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-nodes #<lambda (automationnum seqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-move> #<lambda ({original}-18615 . {arguments}-18616)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-move #<lambda ({original}-18615 . {arguments}-18616)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move-nokeywords #<lambda (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move #<lambda* (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqautomation-popup-menu #<lambda (mouse-x mouse-y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqblock-automation-node-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-nodes #<lambda (automationnum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-automation-node #<lambda (node-num automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining remove-seqblock-automation #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-selected? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-blocks-to-clipboard #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-copy-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-paste-sequencer-blocks #<lambda (seqtracknum time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-cut-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-update-seqblock-track-on-off-configuration #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-stretch #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-speed #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-width #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-move-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-topmost-seqtrack-from-navigator #<lambda (org-topmost dy)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
*************** WARNING! schemecodeparser: "*mouse-move-handlers*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 195
******* Note from mylint: Higher order function call detected for expression: '(move-handler button x y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 204 
*************** WARNING! schemecodeparser: "*mouse-cycles*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 210
******* Note from mylint: Higher order function call detected for expression: '(cycle :press-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 223...(suppressing rest)... 
*************** WARNING! schemecodeparser: "mouse-fx-has-been-set" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 403....(suppressing rest).....
******* Note from mylint: The function 'new-mouse-cycle' has the value '(get-mouse-cycle $button $x $y)', which looks suspicious. Expression: '(new-mouse-cycle :drag-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 617. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1033', which looks suspicious. Expression: '(Cycle :press)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1033', which looks suspicious. Expression: '(Cycle :move-and-release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1033', which looks suspicious. Expression: '(Cycle :release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Move' has the value '(Cycle-and-node :move)', which looks suspicious. Expression: '(Move Button Dx Dy Old-node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'Release' has the value '(Cycle-and-node :release)', which looks suspicious. Expression: '(Release Button X Y node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'area-box' has the value '(Node :area-box)', which looks suspicious. Expression: '(area-box :width)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1069. 
*************** NOTE: schemecodeparser: "node-info" has already been defined locally. Old: (schemecodeparser-define-var-type (Node :node-info)). New: (node-info schemecodeparser-define-var-type (Move-node node-info new-value (if Use-Place (if new-y (if Use-Grid-Place (get-place-from-y Button new-y) (ra:get-place-from-y new-y)) 'same-place) new-y)))/home/kjetil/radium/bin/scheme/mouse.scm: 1069....(suppressing rest).....
******* Note from mylint: The function 'new' has the value '(or (maybe-get-seqblock-info-from-current-seqautomation)
    (get-seqblock-info X Y))', which looks suspicious. Expression: '(new :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1332. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 1994. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes pitchinfonum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :place)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'move-func' has the value '(car move-func-and-pianonotenum)', which looks suspicious. Expression: '(move-func pianonotenum
           (if (ra:control-pressed)
               Value
               (round Value)) Place notenum
           *current-track-num*)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'func' has the value '(cond (move-start ra:move-pianonote-start)
      (move-end ra:move-pianonote-end)
      (move-all ra:move-pianonote)
      (else
       (if (not (and (list "UNKNOWN pianonote-info type: " move-type) #f))
           (handle-assertion '(and (list "UNKNOWN pianonote-info type: " move-type) #f) #t))))', which looks suspicious. Expression: '(func pianonotenum
      (if (not do-set-new-pitch)
          -1
          (+ delta-Value (get-note-value noteid pianonotenum)))
      (get-new-note-place noteid delta-Place) noteid tracknum blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2646. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value '(make-pianonote-info
  :blocknum (ra:current-block)
  :tracknum *current-track-num*
  :noteid #f
  :pianonotenum 0
  :move-type *pianonote-move-end*
  :mouse-delta 0
  :playing-note-id #f
  :playing-note-pitch #f
  :new-note #t
  :extra create-note)', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :x)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline bot-realline)', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4400. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline (between 0 (+ realline 1) (ra:get-num-reallines)))', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(if (< realline top-realline)
    (ra:get-beat-at-realline realline)
    (beats (- realline top-realline)))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'maybe' has the value '(if is-beat
    (ra:get-current-beat)
    (ra:get-current-bar))', which looks suspicious. Expression: '(maybe :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4704. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes (seqmove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6588. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6609. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7286. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7298. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock' has the value '(move-single :seqblock)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'mybox' has the value '(make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2) (ra:get-sequencer-y2))', which looks suspicious. Expression: '(mybox :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8041. 
******* Note from mylint: The function 'curr-dist' has the value '(and (inside-box? (make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2)
                             (ra:get-sequencer-y2))
                  X Y)
     (get-closest-seqautomation X Y))', which looks suspicious. Expression: '(curr-dist :distance)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8252. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8878. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9096. 
******* Note from mylint: The function 'box' has the value '(make-box2 (ra:get-seqnav-right-size-handle-x1) (ra:get-seqnav-right-size-handle-y1)
           (ra:get-seqnav-right-size-handle-x2) (ra:get-seqnav-right-size-handle-y2))', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
result: #t
radium> 'sequencer.scm already provided 
'seqblock_editor.scm already provided 
'seqblock_audio.scm already provided 
'mouse-primitives.scm already provided 
Warning: Redefining square #<lambda (x)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance-vertical #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-delta-place #<lambda (place delta-place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-place-from-y #<lambda (Button Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-place-from-y #<lambda* (Button Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-move-handlers* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-move-handler #<lambda* (move)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining run-mouse-move-handlers #<lambda (button x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle-front #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-mouse-cycle #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-new-seqblock? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-all-nodes? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-delta-mouse-handler #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-fx #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining mouse-track-has-been-set #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track-to-reltempo #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-note #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-pitchnum #<lambda (num tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-velocity-node #<lambda (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-fxnode #<lambda (fxnodenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-custom-seq-indicator #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-velocity-node #<lambda (velnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-fxnode #<lambda (fxnodenum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pitchnum #<lambda (pitchnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote-force #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-piano-ghost-note #<lambda (start end ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-force #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cancel-current-stuff #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining handling-nodes #<lambda (state thunk)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-press #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-move #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-release #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num-all-tracks* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-track-num! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-subtrack-num* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-common-node-box #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node-horizontal #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node-horizontal #<lambda* ($x $get-node-box ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-node-handler-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-move-node-handler> #<lambda ({original}-21123 . {arguments}-21124)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-move-node-handler #<lambda ({original}-21123 . {arguments}-21124)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler-nokeywords #<lambda (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler #<lambda* (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining node-mouse-cycle-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-node-mouse-cycle> #<lambda ({original}-21133 . {arguments}-21134)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-node-mouse-cycle #<lambda ({original}-21133 . {arguments}-21134)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle-nokeywords #<lambda (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *move-existing-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *create-new-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-cycle-and-node #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-node-mouse-handler #<lambda* (Get-area-box Get-existing-node-info ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining editorautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-editorautomation-move> #<lambda ({original}-21161 . {arguments}-21162)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editorautomation-move #<lambda ({original}-21161 . {arguments}-21162)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move-nokeywords #<lambda (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move #<lambda* (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-horizontal-handler #<lambda* (Get-handler-data Get-x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqblock-info> #<lambda ({original}-21183 . {arguments}-21184)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqblock-info #<lambda ({original}-21183 . {arguments}-21184)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info2 #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info3 #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-selected-seqblock-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info2 #<lambda (seqtracknum X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-get-seqblock-info-from-current-seqautomation #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-call-me-after-curr-seqblock-under-mouse-has-been-called #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-info! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-BPMs #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-show-instrument-color-dialog #<lambda* (parentgui instrument-ids)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-instrument-color-dialog-for-all-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swingtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining centtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining chancetext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocitytext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining request-midi-channel #<lambda (now callback)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-editor-editor-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining track-configuration-popup-async #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-temponode-info> #<lambda ({original}-21243 . {arguments}-21244)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-temponode-info #<lambda ({original}-21243 . {arguments}-21244)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info-nokeywords #<lambda (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info #<lambda* (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-temponode-in-statusbar #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponodeval->01 #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining 01->temponodeval #<lambda (O1)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-temponode #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place-or-below #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-spans-last-place #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining todofunc #<lambda (funcname . $returnvalue)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pitchnum-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pitchnum-info> #<lambda ({original}-21253 . {arguments}-21254)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pitchnum-info #<lambda ({original}-21253 . {arguments}-21254)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info-nokeywords #<lambda (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info #<lambda* (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-pitchnum #<lambda (tracknum Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-pitch #<lambda* (pitchnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pianonote-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pianonote-info> #<lambda ({original}-21263 . {arguments}-21264)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pianonote-info #<lambda ({original}-21263 . {arguments}-21264)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info-nokeywords #<lambda (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info #<lambda* (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-y #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-box #<lambda ($blocknum $tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-move-type #<lambda ($y $y1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info4 #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info3 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining call-get-existing-node-info-callbacks #<lambda (callback info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-play-pianonote #<lambda (playing-note-pitch)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sane-pianonote-portamento-enabled #<lambda (pianonotenum noteid ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianonote #<lambda (pianonotenum move-type ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-key #<lambda (X)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-pianoroll-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-in-selection-rectangle? #<lambda (pitch1 place1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining select-notes-in-rectangle #<lambda (info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highlight-piano-note-under-mouse #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-ghost-note-values #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining display-ghost-note #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-pianoroll-help-window #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-popup-menu-common-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-eraser-pitches-and-places #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianoroll-eraser #<lambda ($button $dx ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-box #<lambda (Tracknum Notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-velocity-info> #<lambda ({original}-21279 . {arguments}-21280)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-velocity-info #<lambda ({original}-21279 . {arguments}-21280)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info-nokeywords #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info #<lambda* (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info2 #<lambda* (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-rating #<lambda (Y Vi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node #<lambda (num-nodes get-distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-velocity #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining trackwidth-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-trackwidth-info> #<lambda ({original}-21289 . {arguments}-21290)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-trackwidth-info #<lambda ({original}-21289 . {arguments}-21290)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info-nokeywords #<lambda (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info #<lambda* (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining may-be-a-resize-point-in-track #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-resize-point-track #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-trackwidth-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-box #<lambda (Tracknum FX-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fxnode-info> #<lambda ({original}-21299 . {arguments}-21300)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fxnode-info #<lambda ({original}-21299 . {arguments}-21300)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info-nokeywords #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info #<lambda* (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-infos #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-rating #<lambda (Y Fi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fx/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fx/distance> #<lambda ({original}-21309 . {arguments}-21310)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fx/distance #<lambda ({original}-21309 . {arguments}-21310)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance-nokeywords #<lambda (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance #<lambda* (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fxnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fx-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-fx/distance #<lambda (A B)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-fxnode #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-fxnodes #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-full-fx-name #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining realline-above-is-closest? #<lambda (top-realline bot-realline ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-curr-editor-beat #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-beat-or-bar-for-Y #<lambda (Y is-bar)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-from-X-Y #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-editor-beat/bar-range-operation #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-global-swing-track-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-bars-and-beats-or-line-numbers-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-time-tracks-popup-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clicked-seqblock-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-clicked-seqblock> #<lambda ({original}-21349 . {arguments}-21350)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-clicked-seqblock #<lambda ({original}-21349 . {arguments}-21350)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtemponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-value #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-automation-node #<lambda (nodenum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-nodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-highest-seqtemp-value #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqtemponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-statusbar-looppunch-info #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-highlighter #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handler #<lambda (base-name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handlers #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-timeline-looping? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock #<lambda (seqblock new-start-time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock2 #<lambda (seqblock delta-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtracknum #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining num-seqblocks-in-sequencer #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paint-grid! #<lambda (doit)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining only-select-one-seqblock #<lambda (dasseqblocknum dasseqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-gfx-gfx-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-num-visible-seqtracks-between #<lambda (a b)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-nth-visible-seqtrack #<lambda (seqtracknum n-goal)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-data-for-seqblock-moving #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-gfx-gfx-seqblocks #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining apply-gfx-gfx-seqblocks #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-sequencer-pixels-per-value-unit #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-fade-handler #<lambda (is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-seqblock-start-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-interior-pixels-per-value-unit #<lambda (seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-start #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-end #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-interior #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap-halfly? #<lambda* (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap? #<lambda* (seqblock1 seqblock2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-prev-seqblock-end #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-seqblock-start #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-is-overlapping-with-another-block-seqblock #<lambda* (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining auto-add-fades-to-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-add-auto-fades? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblocks-to-autofade #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-add-autofades #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration2 #<lambda (min-num-pixels)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-pos #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock-speedstretch #<lambda (Value seqtracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_set-seqblock-speedstretch #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqblock-speedstretch-handler #<lambda (is-stretch is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-popup-menu-entries #<lambda (seqblock-infos seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-playlist-popup-menu-for-seqblock #<lambda (seqblockid X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqblock-popup-menu #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-forward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-backward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-forward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-backward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swap-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining assert-seqblocks-state #<lambda (seqblocks)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sort-seqblocks-state #<lambda (seqblocks-state)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_move-single-block-class #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation/distance> #<lambda ({original}-21409 . {arguments}-21410)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation/distance #<lambda ({original}-21409 . {arguments}-21410)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance-nokeywords #<lambda (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance #<lambda* (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomationnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomation-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-seqautomation/distance #<lambda rest>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-1 #<lambda (Seqtracknum Nodenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation-0 #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation #<lambda (Seqtracknum Seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-and-highlight-current-seqautomation #<lambda (Button X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqnode-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-node-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-node> #<lambda ({original}-21425 . {arguments}-21426)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-node #<lambda ({original}-21425 . {arguments}-21426)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node-nokeywords #<lambda (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-nodes #<lambda (automationnum seqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-move> #<lambda ({original}-21435 . {arguments}-21436)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-move #<lambda ({original}-21435 . {arguments}-21436)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move-nokeywords #<lambda (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move #<lambda* (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqautomation-popup-menu #<lambda (mouse-x mouse-y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqblock-automation-node-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-nodes #<lambda (automationnum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-automation-node #<lambda (node-num automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining remove-seqblock-automation #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-selected? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-blocks-to-clipboard #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-copy-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-paste-sequencer-blocks #<lambda (seqtracknum time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-cut-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-update-seqblock-track-on-off-configuration #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-stretch #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-speed #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-width #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-move-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-topmost-seqtrack-from-navigator #<lambda (org-topmost dy)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
*************** WARNING! schemecodeparser: "*mouse-move-handlers*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 195
******* Note from mylint: Higher order function call detected for expression: '(move-handler button x y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 204 
*************** WARNING! schemecodeparser: "*mouse-cycles*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 210
******* Note from mylint: Higher order function call detected for expression: '(cycle :press-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 223...(suppressing rest)... 
*************** WARNING! schemecodeparser: "mouse-fx-has-been-set" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 403....(suppressing rest).....
******* Note from mylint: The function 'new-mouse-cycle' has the value '(get-mouse-cycle $button $x $y)', which looks suspicious. Expression: '(new-mouse-cycle :drag-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 617. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1153', which looks suspicious. Expression: '(Cycle :press)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1153', which looks suspicious. Expression: '(Cycle :move-and-release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1153', which looks suspicious. Expression: '(Cycle :release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Move' has the value '(Cycle-and-node :move)', which looks suspicious. Expression: '(Move Button Dx Dy Old-node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'Release' has the value '(Cycle-and-node :release)', which looks suspicious. Expression: '(Release Button X Y node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'area-box' has the value '(Node :area-box)', which looks suspicious. Expression: '(area-box :width)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1069. 
*************** NOTE: schemecodeparser: "node-info" has already been defined locally. Old: (schemecodeparser-define-var-type (Node :node-info)). New: (node-info schemecodeparser-define-var-type (Move-node node-info new-value (if Use-Place (if new-y (if Use-Grid-Place (get-place-from-y Button new-y) (ra:get-place-from-y new-y)) 'same-place) new-y)))/home/kjetil/radium/bin/scheme/mouse.scm: 1069....(suppressing rest).....
******* Note from mylint: The function 'new' has the value '(or (maybe-get-seqblock-info-from-current-seqautomation)
    (get-seqblock-info X Y))', which looks suspicious. Expression: '(new :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1332. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 1994. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes pitchinfonum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :place)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'move-func' has the value '(car move-func-and-pianonotenum)', which looks suspicious. Expression: '(move-func pianonotenum
           (if (ra:control-pressed)
               Value
               (round Value)) Place notenum
           *current-track-num*)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'func' has the value '(cond (move-start ra:move-pianonote-start)
      (move-end ra:move-pianonote-end)
      (move-all ra:move-pianonote)
      (else
       (if (not (and (list "UNKNOWN pianonote-info type: " move-type) #f))
           (handle-assertion '(and (list "UNKNOWN pianonote-info type: " move-type) #f) #t))))', which looks suspicious. Expression: '(func pianonotenum
      (if (not do-set-new-pitch)
          -1
          (+ delta-Value (get-note-value noteid pianonotenum)))
      (get-new-note-place noteid delta-Place) noteid tracknum blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2646. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value '(make-pianonote-info
  :blocknum (ra:current-block)
  :tracknum *current-track-num*
  :noteid #f
  :pianonotenum 0
  :move-type *pianonote-move-end*
  :mouse-delta 0
  :playing-note-id #f
  :playing-note-pitch #f
  :new-note #t
  :extra create-note)', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :x)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline bot-realline)', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4400. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline (between 0 (+ realline 1) (ra:get-num-reallines)))', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(if (< realline top-realline)
    (ra:get-beat-at-realline realline)
    (beats (- realline top-realline)))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'maybe' has the value '(if is-beat
    (ra:get-current-beat)
    (ra:get-current-bar))', which looks suspicious. Expression: '(maybe :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4704. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes (seqmove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6588. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6609. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7286. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7298. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock' has the value '(move-single :seqblock)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'mybox' has the value '(make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2) (ra:get-sequencer-y2))', which looks suspicious. Expression: '(mybox :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8041. 
******* Note from mylint: The function 'curr-dist' has the value '(and (inside-box? (make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2)
                             (ra:get-sequencer-y2))
                  X Y)
     (get-closest-seqautomation X Y))', which looks suspicious. Expression: '(curr-dist :distance)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8252. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8878. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9096. 
******* Note from mylint: The function 'box' has the value '(make-box2 (ra:get-seqnav-right-size-handle-x1) (ra:get-seqnav-right-size-handle-y1)
           (ra:get-seqnav-right-size-handle-x2) (ra:get-seqnav-right-size-handle-y2))', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
result: #t
radium> 'sequencer.scm already provided 
'seqblock_editor.scm already provided 
'seqblock_audio.scm already provided 
'mouse-primitives.scm already provided 
Warning: Redefining square #<lambda (x)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance-vertical #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-delta-place #<lambda (place delta-place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-place-from-y #<lambda (Button Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-place-from-y #<lambda* (Button Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-move-handlers* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-move-handler #<lambda* (move)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining run-mouse-move-handlers #<lambda (button x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle-front #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-mouse-cycle #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-new-seqblock? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-all-nodes? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-delta-mouse-handler #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-fx #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track-to-reltempo #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-note #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-pitchnum #<lambda (num tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-velocity-node #<lambda (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-fxnode #<lambda (fxnodenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-custom-seq-indicator #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-velocity-node #<lambda (velnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-fxnode #<lambda (fxnodenum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pitchnum #<lambda (pitchnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote-force #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-piano-ghost-note #<lambda (start end ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-force #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cancel-current-stuff #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining handling-nodes #<lambda (state thunk)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-press #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-move #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-release #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num-all-tracks* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-track-num! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-common-node-box #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node-horizontal #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node-horizontal #<lambda* ($x $get-node-box ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-node-handler-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-move-node-handler> #<lambda ({original}-24287 . {arguments}-24288)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-move-node-handler #<lambda ({original}-24287 . {arguments}-24288)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler-nokeywords #<lambda (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler #<lambda* (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining node-mouse-cycle-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-node-mouse-cycle> #<lambda ({original}-24297 . {arguments}-24298)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-node-mouse-cycle #<lambda ({original}-24297 . {arguments}-24298)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle-nokeywords #<lambda (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *move-existing-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *create-new-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-cycle-and-node #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-node-mouse-handler #<lambda* (Get-area-box Get-existing-node-info ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining editorautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-editorautomation-move> #<lambda ({original}-24325 . {arguments}-24326)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editorautomation-move #<lambda ({original}-24325 . {arguments}-24326)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move-nokeywords #<lambda (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move #<lambda* (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-horizontal-handler #<lambda* (Get-handler-data Get-x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqblock-info> #<lambda ({original}-24347 . {arguments}-24348)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqblock-info #<lambda ({original}-24347 . {arguments}-24348)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info2 #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info3 #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-selected-seqblock-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info2 #<lambda (seqtracknum X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-get-seqblock-info-from-current-seqautomation #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-call-me-after-curr-seqblock-under-mouse-has-been-called #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-info! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-BPMs #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-show-instrument-color-dialog #<lambda* (parentgui instrument-ids)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-instrument-color-dialog-for-all-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swingtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining centtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining chancetext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocitytext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining request-midi-channel #<lambda (now callback)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-editor-editor-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining track-configuration-popup-async #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-temponode-info> #<lambda ({original}-24407 . {arguments}-24408)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-temponode-info #<lambda ({original}-24407 . {arguments}-24408)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info-nokeywords #<lambda (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info #<lambda* (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-temponode-in-statusbar #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponodeval->01 #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining 01->temponodeval #<lambda (O1)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-temponode #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place-or-below #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-spans-last-place #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining todofunc #<lambda (funcname . $returnvalue)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pitchnum-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pitchnum-info> #<lambda ({original}-24417 . {arguments}-24418)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pitchnum-info #<lambda ({original}-24417 . {arguments}-24418)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info-nokeywords #<lambda (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info #<lambda* (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-pitchnum #<lambda (tracknum Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-pitch #<lambda* (pitchnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pianonote-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pianonote-info> #<lambda ({original}-24427 . {arguments}-24428)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pianonote-info #<lambda ({original}-24427 . {arguments}-24428)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info-nokeywords #<lambda (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info #<lambda* (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-y #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-box #<lambda ($blocknum $tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-move-type #<lambda ($y $y1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info4 #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info3 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining call-get-existing-node-info-callbacks #<lambda (callback info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-play-pianonote #<lambda (playing-note-pitch)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sane-pianonote-portamento-enabled #<lambda (pianonotenum noteid ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianonote #<lambda (pianonotenum move-type ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-key #<lambda (X)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-pianoroll-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-in-selection-rectangle? #<lambda (pitch1 place1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining select-notes-in-rectangle #<lambda (info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highlight-piano-note-under-mouse #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-ghost-note-values #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining display-ghost-note #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-pianoroll-help-window #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-popup-menu-common-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-eraser-pitches-and-places #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianoroll-eraser #<lambda ($button $dx ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-box #<lambda (Tracknum Notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-velocity-info> #<lambda ({original}-24443 . {arguments}-24444)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-velocity-info #<lambda ({original}-24443 . {arguments}-24444)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info-nokeywords #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info #<lambda* (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info2 #<lambda* (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-rating #<lambda (Y Vi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node #<lambda (num-nodes get-distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-velocity #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining trackwidth-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-trackwidth-info> #<lambda ({original}-24453 . {arguments}-24454)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-trackwidth-info #<lambda ({original}-24453 . {arguments}-24454)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info-nokeywords #<lambda (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info #<lambda* (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining may-be-a-resize-point-in-track #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-resize-point-track #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-trackwidth-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-box #<lambda (Tracknum FX-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fxnode-info> #<lambda ({original}-24463 . {arguments}-24464)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fxnode-info #<lambda ({original}-24463 . {arguments}-24464)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info-nokeywords #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info #<lambda* (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-infos #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-rating #<lambda (Y Fi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fx/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fx/distance> #<lambda ({original}-24473 . {arguments}-24474)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fx/distance #<lambda ({original}-24473 . {arguments}-24474)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance-nokeywords #<lambda (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance #<lambda* (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fxnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fx-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-fx/distance #<lambda (A B)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-fxnode #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-fxnodes #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-full-fx-name #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining realline-above-is-closest? #<lambda (top-realline bot-realline ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-curr-editor-beat #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-beat-or-bar-for-Y #<lambda (Y is-bar)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-from-X-Y #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-editor-beat/bar-range-operation #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-global-swing-track-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-bars-and-beats-or-line-numbers-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-time-tracks-popup-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clicked-seqblock-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-clicked-seqblock> #<lambda ({original}-24513 . {arguments}-24514)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-clicked-seqblock #<lambda ({original}-24513 . {arguments}-24514)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtemponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-value #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-automation-node #<lambda (nodenum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-nodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-highest-seqtemp-value #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqtemponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-statusbar-looppunch-info #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-highlighter #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handler #<lambda (base-name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handlers #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-timeline-looping? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock #<lambda (seqblock new-start-time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock2 #<lambda (seqblock delta-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtracknum #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining num-seqblocks-in-sequencer #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paint-grid! #<lambda (doit)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining only-select-one-seqblock #<lambda (dasseqblocknum dasseqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-gfx-gfx-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-num-visible-seqtracks-between #<lambda (a b)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-nth-visible-seqtrack #<lambda (seqtracknum n-goal)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-data-for-seqblock-moving #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-gfx-gfx-seqblocks #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining apply-gfx-gfx-seqblocks #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-sequencer-pixels-per-value-unit #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-fade-handler #<lambda (is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-seqblock-start-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-interior-pixels-per-value-unit #<lambda (seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-start #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-end #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-interior #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap-halfly? #<lambda* (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap? #<lambda* (seqblock1 seqblock2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-prev-seqblock-end #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-seqblock-start #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-is-overlapping-with-another-block-seqblock #<lambda* (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining auto-add-fades-to-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-add-auto-fades? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblocks-to-autofade #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-add-autofades #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration2 #<lambda (min-num-pixels)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-pos #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock-speedstretch #<lambda (Value seqtracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_set-seqblock-speedstretch #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqblock-speedstretch-handler #<lambda (is-stretch is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-popup-menu-entries #<lambda (seqblock-infos seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-playlist-popup-menu-for-seqblock #<lambda (seqblockid X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqblock-popup-menu #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-forward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-backward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-forward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-backward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swap-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining assert-seqblocks-state #<lambda (seqblocks)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sort-seqblocks-state #<lambda (seqblocks-state)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_move-single-block-class #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation/distance> #<lambda ({original}-24573 . {arguments}-24574)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation/distance #<lambda ({original}-24573 . {arguments}-24574)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance-nokeywords #<lambda (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance #<lambda* (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomationnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomation-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-seqautomation/distance #<lambda rest>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-1 #<lambda (Seqtracknum Nodenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation-0 #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation #<lambda (Seqtracknum Seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-and-highlight-current-seqautomation #<lambda (Button X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqnode-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-node-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-node> #<lambda ({original}-24589 . {arguments}-24590)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-node #<lambda ({original}-24589 . {arguments}-24590)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node-nokeywords #<lambda (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-nodes #<lambda (automationnum seqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-move> #<lambda ({original}-24599 . {arguments}-24600)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-move #<lambda ({original}-24599 . {arguments}-24600)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move-nokeywords #<lambda (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move #<lambda* (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqautomation-popup-menu #<lambda (mouse-x mouse-y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqblock-automation-node-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-nodes #<lambda (automationnum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-automation-node #<lambda (node-num automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining remove-seqblock-automation #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-selected? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-blocks-to-clipboard #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-copy-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-paste-sequencer-blocks #<lambda (seqtracknum time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-cut-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-update-seqblock-track-on-off-configuration #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-stretch #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-speed #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-width #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-move-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-topmost-seqtrack-from-navigator #<lambda (org-topmost dy)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
*************** WARNING! schemecodeparser: "*mouse-move-handlers*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 195
******* Note from mylint: Higher order function call detected for expression: '(move-handler button x y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 204 
*************** WARNING! schemecodeparser: "*mouse-cycles*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 210
******* Note from mylint: Higher order function call detected for expression: '(cycle :press-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 223...(suppressing rest)... 
*************** WARNING! schemecodeparser: "mouse-fx-has-been-set" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 405....(suppressing rest).....
******* Note from mylint: The function 'new-mouse-cycle' has the value '(get-mouse-cycle $button $x $y)', which looks suspicious. Expression: '(new-mouse-cycle :drag-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 619. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 808. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 808. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 830. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 830. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 849. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 849. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1267', which looks suspicious. Expression: '(Cycle :press)'. /home/kjetil/radium/bin/scheme/mouse.scm: 874. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1267', which looks suspicious. Expression: '(Cycle :move-and-release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 874. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1267', which looks suspicious. Expression: '(Cycle :release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 874. 
******* Note from mylint: The function 'Move' has the value '(Cycle-and-node :move)', which looks suspicious. Expression: '(Move Button Dx Dy Old-node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 904. 
******* Note from mylint: The function 'Release' has the value '(Cycle-and-node :release)', which looks suspicious. Expression: '(Release Button X Y node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 904. 
******* Note from mylint: The function 'area-box' has the value '(Node :area-box)', which looks suspicious. Expression: '(area-box :width)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1071. 
*************** NOTE: schemecodeparser: "node-info" has already been defined locally. Old: (schemecodeparser-define-var-type (Node :node-info)). New: (node-info schemecodeparser-define-var-type (Move-node node-info new-value (if Use-Place (if new-y (if Use-Grid-Place (get-place-from-y Button new-y) (ra:get-place-from-y new-y)) 'same-place) new-y)))/home/kjetil/radium/bin/scheme/mouse.scm: 1071....(suppressing rest).....
******* Note from mylint: The function 'new' has the value '(or (maybe-get-seqblock-info-from-current-seqautomation)
    (get-seqblock-info X Y))', which looks suspicious. Expression: '(new :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1334. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1438. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1438. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1438. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 1996. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes pitchinfonum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :place)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'move-func' has the value '(car move-func-and-pianonotenum)', which looks suspicious. Expression: '(move-func pianonotenum
           (if (ra:control-pressed)
               Value
               (round Value)) Place notenum
           *current-track-num*)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2293. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2441. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2441. 
******* Note from mylint: The function 'func' has the value '(cond (move-start ra:move-pianonote-start)
      (move-end ra:move-pianonote-end)
      (move-all ra:move-pianonote)
      (else
       (if (not (and (list "UNKNOWN pianonote-info type: " move-type) #f))
           (handle-assertion '(and (list "UNKNOWN pianonote-info type: " move-type) #f) #t))))', which looks suspicious. Expression: '(func pianonotenum
      (if (not do-set-new-pitch)
          -1
          (+ delta-Value (get-note-value noteid pianonotenum)))
      (get-new-note-place noteid delta-Place) noteid tracknum blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2648. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2936. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2936. 
******* Note from mylint: The function 'pianonote-info' has the value '(make-pianonote-info
  :blocknum (ra:current-block)
  :tracknum *current-track-num*
  :noteid #f
  :pianonotenum 0
  :move-type *pianonote-move-end*
  :mouse-delta 0
  :playing-note-id #f
  :playing-note-pitch #f
  :new-note #t
  :extra create-note)', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2936. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3080. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3135. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3135. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3135. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3348. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3539. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :x)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3539. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3539. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3732. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3764. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3764. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3764. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3829. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4031. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4031. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4241. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4268. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4268. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4268. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4320. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline bot-realline)', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4402. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline (between 0 (+ realline 1) (ra:get-num-reallines)))', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4422. 
******* Note from mylint: The function 'beat' has the value '(if (< realline top-realline)
    (ra:get-beat-at-realline realline)
    (beats (- realline top-realline)))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4422. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4438. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4438. 
******* Note from mylint: The function 'maybe' has the value '(if is-beat
    (ra:get-current-beat)
    (ra:get-current-bar))', which looks suspicious. Expression: '(maybe :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4706. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5113. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5113. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5113. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5113. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5354. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5354. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5502. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5502. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5502. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes (seqmove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 5502. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5502. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5922. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5922. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6042. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6042. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6170. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6170. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6170. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6205. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6205. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6328. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6328. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6328. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6328. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6449. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6449. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6449. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6449. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6482. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6541. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6541. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6541. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6541. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6541. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6541. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6590. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6611. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6672. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6679. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6679. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6715. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6715. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6715. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6715. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6866. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6866. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6866. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6866. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6961. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7030. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7030. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7206. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7206. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7242. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7274. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7288. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7300. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7335. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7335. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7335. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7335. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7335. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7335. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7350. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7350. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7624. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7746. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7746. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7746. 
******* Note from mylint: The function 'seqblock' has the value '(move-single :seqblock)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7746. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7907. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7907. 
******* Note from mylint: The function 'mybox' has the value '(make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2) (ra:get-sequencer-y2))', which looks suspicious. Expression: '(mybox :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8043. 
******* Note from mylint: The function 'curr-dist' has the value '(and (inside-box? (make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2)
                             (ra:get-sequencer-y2))
                  X Y)
     (get-closest-seqautomation X Y))', which looks suspicious. Expression: '(curr-dist :distance)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8254. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8417. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8417. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8417. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8417. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8736. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8736. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8736. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8736. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8880. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8981. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9017. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9098. 
******* Note from mylint: The function 'box' has the value '(make-box2 (ra:get-seqnav-right-size-handle-x1) (ra:get-seqnav-right-size-handle-y1)
           (ra:get-seqnav-right-size-handle-x2) (ra:get-seqnav-right-size-handle-y2))', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9189. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9189. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9189. 
result: #t
radium> 'sequencer.scm already provided 
'seqblock_editor.scm already provided 
'seqblock_audio.scm already provided 
'mouse-primitives.scm already provided 
Warning: Redefining square #<lambda (x)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-distance-vertical #<lambda (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-maybe-gridded-delta-place #<lambda (place delta-place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-place-from-y #<lambda (Button Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-place-from-y #<lambda* (Button Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-move-handlers* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-move-handler #<lambda* (move)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining run-mouse-move-handlers #<lambda (button x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-mouse-cycle-front #<lambda ($mouse-cycle)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-mouse-cycle #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-new-seqblock? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-all-nodes? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-delta-mouse-handler #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-fx #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining mouse-track-has-been-set #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-track-to-reltempo #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-mouse-note #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-pitchnum #<lambda (num tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-velocity-node #<lambda (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-indicator-fxnode #<lambda (fxnodenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-custom-seq-indicator #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-temponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-velocity-node #<lambda (velnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-fxnode #<lambda (fxnodenum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pitchnum #<lambda (pitchnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-pianonote-force #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-piano-ghost-note #<lambda (start end ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-force #<lambda* (barnum beatnum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cancel-current-stuff #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining handling-nodes #<lambda (state thunk)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-press #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-move #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining radium-mouse-release #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num-all-tracks* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *current-track-num* #f
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-track-num! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-subtrack-from-x #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-common-node-box #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-node-horizontal #<lambda* ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node-horizontal #<lambda* ($x $get-node-box ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-node-handler-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-move-node-handler> #<lambda ({original}-28609 . {arguments}-28610)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-move-node-handler #<lambda ({original}-28609 . {arguments}-28610)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler-nokeywords #<lambda (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-move-node-handler #<lambda* (move release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining node-mouse-cycle-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-node-mouse-cycle> #<lambda ({original}-28619 . {arguments}-28620)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-node-mouse-cycle #<lambda ({original}-28619 . {arguments}-28620)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle-nokeywords #<lambda (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-node-mouse-cycle #<lambda* (press move-and-release ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *move-existing-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining *create-new-node-mouse-cycles* ()
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-cycle-and-node #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-node-mouse-handler #<lambda* (Get-area-box Get-existing-node-info ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining editorautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-editorautomation-move> #<lambda ({original}-28647 . {arguments}-28648)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editorautomation-move #<lambda ({original}-28647 . {arguments}-28648)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move-nokeywords #<lambda (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-editorautomation-move #<lambda* (Num nodes ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining add-horizontal-handler #<lambda* (Get-handler-data Get-x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqblock-info> #<lambda ({original}-28669 . {arguments}-28670)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqblock-info #<lambda ({original}-28669 . {arguments}-28670)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info2 #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqblock-info3 #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-selected-seqblock-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info2 #<lambda (seqtracknum X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-get-seqblock-info-from-current-seqautomation #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-call-me-after-curr-seqblock-under-mouse-has-been-called #<lambda (seqblockid)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-info! #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-BPMs #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-show-instrument-color-dialog #<lambda* (parentgui instrument-ids)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-instrument-color-dialog-for-all-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swingtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining centtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining chancetext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocitytext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxtext-popup-elements #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining request-midi-channel #<lambda (now callback)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-editor-editor-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining track-configuration-popup-async #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-temponode-info> #<lambda ({original}-28729 . {arguments}-28730)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-temponode-info #<lambda ({original}-28729 . {arguments}-28730)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info-nokeywords #<lambda (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-temponode-info #<lambda* (place value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-infos #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-temponode-in-statusbar #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-temponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining temponodeval->01 #<lambda (value)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining 01->temponodeval #<lambda (O1)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-temponode #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining place-is-last-place-or-below #<lambda (place)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-spans-last-place #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-note-num #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining todofunc #<lambda (funcname . $returnvalue)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pitchnum-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pitchnum-info> #<lambda ({original}-28739 . {arguments}-28740)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pitchnum-info #<lambda ({original}-28739 . {arguments}-28740)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info-nokeywords #<lambda (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pitchnum-info #<lambda* (place value ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pitchnum-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-pitch-in-current-track #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-pitchnum #<lambda (tracknum Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-pitch #<lambda* (pitchnum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining pianonote-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-pianonote-info> #<lambda ({original}-28749 . {arguments}-28750)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-pianonote-info #<lambda ({original}-28749 . {arguments}-28750)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info-nokeywords #<lambda (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-pianonote-info #<lambda* (blocknum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-y #<lambda (pianonotenum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-box #<lambda ($blocknum $tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-move-type #<lambda ($y $y1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info4 #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info3 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianonote-info #<lambda ($x $y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining call-get-existing-node-info-callbacks #<lambda (callback info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-play-pianonote #<lambda (playing-note-pitch)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sane-pianonote-portamento-enabled #<lambda (pianonotenum noteid ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianonote #<lambda (pianonotenum move-type ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-key #<lambda (X)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-track-pianoroll-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining note-in-selection-rectangle? #<lambda (pitch1 place1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining select-notes-in-rectangle #<lambda (info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highlight-piano-note-under-mouse #<lambda ($x $y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-ghost-note-values #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining display-ghost-note #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-pianoroll-help-window #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-popup-menu-common-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-pianoroll-eraser-pitches-and-places #<lambda ($button $x ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-pianoroll-eraser #<lambda ($button $dx ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-box #<lambda (Tracknum Notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-velocity-info> #<lambda ({original}-28765 . {arguments}-28766)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-velocity-info #<lambda ({original}-28765 . {arguments}-28766)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info-nokeywords #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info #<lambda* (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-velocity-info2 #<lambda* (velocitynum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-infos #<lambda (notenum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining velocity-info-rating #<lambda (Y Vi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-velocity-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-velocity-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-shortest-velocity-distance #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-node #<lambda (num-nodes get-distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-velocity #<lambda (tracknum notenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining trackwidth-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-trackwidth-info> #<lambda ({original}-28775 . {arguments}-28776)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-trackwidth-info #<lambda ({original}-28775 . {arguments}-28776)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info-nokeywords #<lambda (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-trackwidth-info #<lambda* (tracknum width ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining may-be-a-resize-point-in-track #<lambda (X Y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-resize-point-track #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-trackwidth-info #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-box #<lambda (Tracknum FX-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fxnode-info> #<lambda ({original}-28785 . {arguments}-28786)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fxnode-info #<lambda ({original}-28785 . {arguments}-28786)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info-nokeywords #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fxnode-info #<lambda* (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-infos #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fxnode-info-rating #<lambda (Y Fi)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info-0 #<lambda (Y A ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining highest-rated-fxnode-info #<lambda (-__Arg1 -__Arg2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-2 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-fxnode-info #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining fx/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-fx/distance> #<lambda ({original}-28795 . {arguments}-28796)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-fx/distance #<lambda ({original}-28795 . {arguments}-28796)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance-nokeywords #<lambda (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-fx/distance #<lambda* (fx distance)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fxnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-fx-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-fx/distance #<lambda (A B)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-1 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-fx #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-closest-fxnode #<lambda (tracknum fxnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-fxnodes #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-full-fx-name #<lambda (fxnum tracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining realline-above-is-closest? #<lambda (top-realline bot-realline ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-curr-editor-beat #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-beat-or-bar-for-Y #<lambda (Y is-bar)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-current-barbeat-from-X-Y #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-editor-beat/bar-range-operation #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-all-tracks #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-bar-one-track #<lambda* (barnum tracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-bar #<lambda* (barnum blocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clear-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining cut-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-all-tracks #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paste-editor-beat-one-track #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining insert-editor-beat #<lambda* (barnum beatnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-global-swing-track-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-bars-and-beats-or-line-numbers-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-time-tracks-popup-menu-entries #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining clicked-seqblock-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-clicked-seqblock> #<lambda ({original}-28835 . {arguments}-28836)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-clicked-seqblock #<lambda ({original}-28835 . {arguments}-28836)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock-nokeywords #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-clicked-seqblock #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtemponode-box #<lambda ($num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-value #<lambda (Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-automation-node #<lambda (nodenum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtempo-nodes #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-highest-seqtemp-value #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqtemponode #<lambda (num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-statusbar-looppunch-info #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-highlighter #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handler #<lambda (base-name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqlooppunch-mouse-handlers #<lambda (name color ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-timeline-looping? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock #<lambda (seqblock new-start-time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock2 #<lambda (seqblock delta-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqtracknum #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining num-seqblocks-in-sequencer #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining paint-grid! #<lambda (doit)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining only-select-one-seqblock #<lambda (dasseqblocknum dasseqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining delete-all-gfx-gfx-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-num-visible-seqtracks-between #<lambda (a b)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-nth-visible-seqtrack #<lambda (seqtracknum n-goal)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-data-for-seqblock-moving #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-gfx-gfx-seqblocks #<lambda (seqblock-infos inc-time ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining apply-gfx-gfx-seqblocks #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-sequencer-pixels-per-value-unit #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-fade-handler #<lambda (is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-max-seqblock-start-interior #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-interior-pixels-per-value-unit #<lambda (seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-start #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-new-seqblock-interior-end #<lambda (seqblock-info mousex)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-interior #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap-halfly? #<lambda* (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblocks-overlap? #<lambda* (seqblock1 seqblock2)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-prev-seqblock-end #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-next-seqblock-start #<lambda (pos seqblocks ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-is-overlapping-with-another-block-seqblock #<lambda* (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining auto-add-fades-to-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-add-auto-fades? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblocks-to-autofade #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining maybe-add-autofades #<lambda (seqblocks seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration2 #<lambda (min-num-pixels)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-duration #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-min-seqblock-end-pos #<lambda (min-num-pixels seqblock-info)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining move-seqblock-speedstretch #<lambda (Value seqtracknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_set-seqblock-speedstretch #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining create-seqblock-speedstretch-handler #<lambda (is-stretch is-left)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-popup-menu-entries #<lambda (seqblock-infos seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-playlist-popup-menu-for-seqblock #<lambda (seqblockid X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqblock-popup-menu #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-forward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining do-auto-swap-backward? #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-forward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining find-seqblock-to-backward-autoswap-with #<lambda (seqblocks seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining swap-seqblocks #<lambda (seqblocks seqblocknum1 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining assert-seqblocks-state #<lambda (seqblocks)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining sort-seqblocks-state #<lambda (seqblocks-state)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining new_instance_of_move-single-block-class #<lambda* (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation/distance-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation/distance> #<lambda ({original}-28895 . {arguments}-28896)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation/distance #<lambda ({original}-28895 . {arguments}-28896)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance-nokeywords #<lambda (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation/distance #<lambda* (seqtrack automation-num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomationnum #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-current-seqautomation-distance #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining min-seqautomation/distance #<lambda rest>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-1 #<lambda (Seqtracknum Nodenum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation-0 #<lambda (-__Arg1 -__Arg2 ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation-0 #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqblock-automation #<lambda (Seqtracknum Seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-closest-seqautomation #<lambda (X Y)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-and-highlight-current-seqautomation #<lambda (Button X ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqnode-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-node-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-node> #<lambda ({original}-28911 . {arguments}-28912)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-node #<lambda ({original}-28911 . {arguments}-28912)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node-nokeywords #<lambda (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-node #<lambda* (time y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqautomation-nodes #<lambda (automationnum seqtracknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqautomation-move-struct-mapper #<lambda (key)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining <copy-seqautomation-move> #<lambda ({original}-28921 . {arguments}-28922)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-seqautomation-move #<lambda ({original}-28921 . {arguments}-28922)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move-nokeywords #<lambda (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining make-seqautomation-move #<lambda* (nodes Num ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining show-seqautomation-popup-menu #<lambda (mouse-x mouse-y ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-seqblock-automation-node-statusbar-text #<lambda (Num)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-node #<lambda (nodenum automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqblock-automation-nodes #<lambda (automationnum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-curr-seqblock-automation-node #<lambda (node-num automationnum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining remove-seqblock-automation #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining seqblock-selected? #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining copy-blocks-to-clipboard #<lambda (seqblock-infos)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-copy-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-paste-sequencer-blocks #<lambda (seqtracknum time)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-delete-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-cut-all-selected-seqblocks #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining FROM_C-update-seqblock-track-on-off-configuration #<lambda (seqtracknum seqblocknum)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-stretch #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining reset-seqblock-speed #<lambda (seqtracknum seqblocknum ...)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-width #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining get-seqnav-move-box #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
Warning: Redefining set-topmost-seqtrack-from-navigator #<lambda (org-topmost dy)>
 while loading /home/kjetil/radium/bin/scheme/mouse.scm 
*************** WARNING! schemecodeparser: "*mouse-move-handlers*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 195
******* Note from mylint: Higher order function call detected for expression: '(move-handler button x y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 204 
*************** WARNING! schemecodeparser: "*mouse-cycles*" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 210
******* Note from mylint: Higher order function call detected for expression: '(cycle :press-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 223...(suppressing rest)... 
*************** WARNING! schemecodeparser: "mouse-fx-has-been-set" has already been defined globally. /home/kjetil/radium/bin/scheme/mouse.scm: 403....(suppressing rest).....
******* Note from mylint: The function 'new-mouse-cycle' has the value '(get-mouse-cycle $button $x $y)', which looks suspicious. Expression: '(new-mouse-cycle :drag-func)'. /home/kjetil/radium/bin/scheme/mouse.scm: 617. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 806. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 828. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'box' has the value '($get-node-box $num)', which looks suspicious. Expression: '(box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 847. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1453', which looks suspicious. Expression: '(Cycle :press)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1453', which looks suspicious. Expression: '(Cycle :move-and-release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Cycle' has the value '-__MatchCar1453', which looks suspicious. Expression: '(Cycle :release)'. /home/kjetil/radium/bin/scheme/mouse.scm: 872. 
******* Note from mylint: The function 'Move' has the value '(Cycle-and-node :move)', which looks suspicious. Expression: '(Move Button Dx Dy Old-node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'Release' has the value '(Cycle-and-node :release)', which looks suspicious. Expression: '(Release Button X Y node)'. /home/kjetil/radium/bin/scheme/mouse.scm: 902. 
******* Note from mylint: The function 'area-box' has the value '(Node :area-box)', which looks suspicious. Expression: '(area-box :width)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1069. 
*************** NOTE: schemecodeparser: "node-info" has already been defined locally. Old: (schemecodeparser-define-var-type (Node :node-info)). New: (node-info schemecodeparser-define-var-type (Move-node node-info new-value (if Use-Place (if new-y (if Use-Grid-Place (get-place-from-y Button new-y) (ra:get-place-from-y new-y)) 'same-place) new-y)))/home/kjetil/radium/bin/scheme/mouse.scm: 1069....(suppressing rest).....
******* Note from mylint: The function 'new' has the value '(or (maybe-get-seqblock-info-from-current-seqautomation)
    (get-seqblock-info X Y))', which looks suspicious. Expression: '(new :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1332. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 1436. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 1994. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes pitchinfonum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(nodes pitchinfonum)', which looks suspicious. Expression: '(pitchnum-info :place)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'move-func' has the value '(car move-func-and-pianonotenum)', which looks suspicious. Expression: '(move-func pianonotenum
           (if (ra:control-pressed)
               Value
               (round Value)) Place notenum
           *current-track-num*)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'pitchnum-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(pitchnum-info :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2291. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'box' has the value '(get-pianonote-box $blocknum $tracknum $notenum $pianonotenum)', which looks suspicious. Expression: '(box :y2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2439. 
******* Note from mylint: The function 'func' has the value '(cond (move-start ra:move-pianonote-start)
      (move-end ra:move-pianonote-end)
      (move-all ra:move-pianonote)
      (else
       (if (not (and (list "UNKNOWN pianonote-info type: " move-type) #f))
           (handle-assertion '(and (list "UNKNOWN pianonote-info type: " move-type) #f) #t))))', which looks suspicious. Expression: '(func pianonotenum
      (if (not do-set-new-pitch)
          -1
          (+ delta-Value (get-note-value noteid pianonotenum)))
      (get-new-note-place noteid delta-Place) noteid tracknum blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2646. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'info' has the value '*curr-pianonote-info*', which looks suspicious. Expression: '(info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value '(make-pianonote-info
  :blocknum (ra:current-block)
  :tracknum *current-track-num*
  :noteid #f
  :pianonotenum 0
  :move-type *pianonote-move-end*
  :mouse-delta 0
  :playing-note-id #f
  :playing-note-pitch #f
  :new-note #t
  :extra create-note)', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 2934. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value 'pianonote-info', which looks suspicious. Expression: '(pianonote-info :move-type)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3078. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3133. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :pianonotenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'pianonote-info' has the value '(get-pianonote-info $x $y *current-track-num* (ra:current-block))', which looks suspicious. Expression: '(pianonote-info :noteid)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3346. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :x)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'box' has the value '(get-velocity-box Tracknum Notenum Velocitynum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3537. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'nodes' has the value '(editormove :nodes)', which looks suspicious. Expression: '(nodes (editormove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3730. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3762. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :velocitynum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :notenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'velocity-info' has the value '(get-velocity-info X Y *current-track-num*)', which looks suspicious. Expression: '(velocity-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 3827. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'box' has the value '(get-fxnode-box Tracknum Fxnum Fxnodenum)', which looks suspicious. Expression: '(box :y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4029. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :value)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(editormove :nodes (editormove :Num))', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4239. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4266. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :tracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'fxnode-info' has the value '(get-fxnode-info X Y *current-track-num*)', which looks suspicious. Expression: '(fxnode-info :fxnodenum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4318. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline bot-realline)', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4400. 
******* Note from mylint: The function 'beats' has the value '(ra:get-beats top-realline (between 0 (+ realline 1) (ra:get-num-reallines)))', which looks suspicious. Expression: '(beats (- realline top-realline))'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(if (< realline top-realline)
    (ra:get-beat-at-realline realline)
    (beats (- realline top-realline)))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4420. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'beat' has the value '(find-beat-or-bar-for-Y Y is-bar)', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4436. 
******* Note from mylint: The function 'maybe' has the value '(if is-beat
    (ra:get-current-beat)
    (ra:get-current-bar))', which looks suspicious. Expression: '(maybe :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 4704. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :bar)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'beat' has the value '(if is-bar
    (ra:get-current-bar)
    (ra:get-current-beat))', which looks suspicious. Expression: '(beat :beat)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5111. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5352. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes (seqmove :Num))'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5500. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 5920. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6040. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6168. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6203. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6326. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblock' has the value '(*current-seqblocks-state* seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy *current-seqblocks-state*)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6447. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'old-seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(old-seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6480. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6539. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6588. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6609. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6670. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6677. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6713. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-left
    (copy-hash seqblock :start-time new-pos)
    (copy-hash seqblock :end-time new-pos))', which looks suspicious. Expression: '(new-seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6864. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-end)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :interior-start)'. /home/kjetil/radium/bin/scheme/mouse.scm: 6959. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7028. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7204. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7240. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7272. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7286. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks n)', which looks suspicious. Expression: '(seqblock2 :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7298. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock1' has the value '(seqblocks seqblocknum1)', which looks suspicious. Expression: '(seqblock1 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock2' has the value '(seqblocks seqblocknum2)', which looks suspicious. Expression: '(seqblock2 :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'ret' has the value '(copy seqblocks)', which looks suspicious. Expression: '(ret seqblocknum1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7333. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblock' has the value '(car seqblocks)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7348. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :sample)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :blocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7622. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock' has the value '(move-single :seqblock)', which looks suspicious. Expression: '(seqblock :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7744. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqtracknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 7905. 
******* Note from mylint: The function 'mybox' has the value '(make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2) (ra:get-sequencer-y2))', which looks suspicious. Expression: '(mybox :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8041. 
******* Note from mylint: The function 'curr-dist' has the value '(and (inside-box? (make-box2 (ra:get-sequencer-x1) (ra:get-sequencer-y1) (ra:get-sequencer-x2)
                             (ra:get-sequencer-y2))
                  X Y)
     (get-closest-seqautomation X Y))', which looks suspicious. Expression: '(curr-dist :distance)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8252. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8415. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :start-Y)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :nodes)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqmove' has the value 'seqmove', which looks suspicious. Expression: '(seqmove :Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'nodes' has the value '(seqmove :nodes)', which looks suspicious. Expression: '(nodes Num)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8734. 
******* Note from mylint: The function 'seqblock' has the value '(ra:get-seqblock-state seqblocknum seqtracknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8878. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :speed)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash seqblock :end-time (+ (seqblock :start-time) (floor (* speed duration))))
    (copy-hash seqblock :start-time (- (seqblock :end-time) (floor (* speed duration)))))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 8979. 
******* Note from mylint: The function 'seqblocks' has the value '(ra:get-seqblocks-state seqtracknum)', which looks suspicious. Expression: '(seqblocks seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock' has the value '(seqblocks seqblocknum)', which looks suspicious. Expression: '(seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :end-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblock' has the value '(if is-right
    (copy-hash
      seqblock
      :end-time (+ (seqblock :start-time) (floor (* stretch duration)))
      :speed 1.0000)
    (copy-hash
      seqblock
      :start-time (- (seqblock :end-time) (floor (* stretch duration)))
      :speed 1.0000))', which looks suspicious. Expression: '(new-seqblock :start-time)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'new-seqblocks-state' has the value '(copy seqblocks)', which looks suspicious. Expression: '(new-seqblocks-state seqblocknum)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9015. 
******* Note from mylint: The function 'seqblock-info' has the value '*current-seqblock-info*', which looks suspicious. Expression: '(seqblock-info :id)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9096. 
******* Note from mylint: The function 'box' has the value '(make-box2 (ra:get-seqnav-right-size-handle-x1) (ra:get-seqnav-right-size-handle-y1)
           (ra:get-seqnav-right-size-handle-x2) (ra:get-seqnav-right-size-handle-y2))', which looks suspicious. Expression: '(box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x2)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
******* Note from mylint: The function 'left-box' has the value '(make-box2 (ra:get-seqnav-left-size-handle-x1) (ra:get-seqnav-left-size-handle-y1)
           (ra:get-seqnav-left-size-handle-x2) (ra:get-seqnav-left-size-handle-y2))', which looks suspicious. Expression: '(left-box :x1)'. /home/kjetil/radium/bin/scheme/mouse.scm: 9187. 
result: #t
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-global-variables-to-display 3 :num-overriding-local-variables-to-display 1 :errorhandler #<lambda (tag . info)> :display-overriding display-overriding :assert-variable-errors #t) 


========== READER Warning: : "ra:get-settings-keys-starting-width" has not been defined in function call (ra:get-settings-keys-starting-width)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-global-variables-to-display 3 :num-overriding-local-variables-to-display 1 :errorhandler #<lambda (tag . info)> :display-overriding display-overriding :assert-variable-errors #t) 


========== READER Warning: : "ra:get-settings-keys-starting-width" has not been defined when parsing atom=========
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (unbound-variable ("unbound variable ~S in ~S" ra:get-settings-keys-starting-width (ra:get-settings-keys-starting-width)))



error: unbound-variable unbound variable ra:get-settings-keys-starting-width in (ra:get-settings-keys-starting-width)

error-code: (ra:get-settings-keys-starting-width)

error-file/line: #f[673]

error-history: 

"(ra:get-settings-keys-starting-width)"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "(<ra> :get-settings-keys-starting-width)" (rootlet))"


    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> result: (hash-table 'font "Cousine,11,-1,5,75,0,0,0,0,0" 'vst_path0 "C:/Program Files (x86)/VSTPlugins" '(symbol "plugin_usage_Ladspa_-__-_Pointer cast distortion") "1" '(symbol "plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player") "122" 'vst_path7 "/home/kjetil/.vst" 'system_font_style "Black" 'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono "1" '(symbol "plugin_usage_Ladspa_-__-_TAP Equalizer/BW") "1" 'num_cpus "4" '(symbol "plugin_usage_Ladspa_-__-_Crossover distortion") "1" 'plugin_usage_Ladspa_-__-_Disintegrator "1" 'audio_device "<?xml version=\"1.0\" encoding=\"UTF-8\"?>  <DEVICESETUP deviceType=\"ALSA\" audioOutputDeviceName=\"HDA Intel, ALC1200 Analog; Front speakers\"              audioInputDeviceName=\"\" audioDeviceRate=\"44100.0\" audioDeviceBufferSize=\"1024\"/>" 'plugin_usage_VST3_-_Uhbik_-_Uhbik-G "2" 'samples_dir "/tmp/radium_bin/sounds" 'plugin_usage_VST3_-_Uhbik_-_Uhbik-P "1" 'filebrowser_sequencer-right-part_3 "/home/kjetil/radium/bin/sounds" 'always_record_midi_velocity "false" 'plugin_usage_VST_-_3BandEQ_-_3BandEQ "1" 'filebrowser_sequencer-right-part_0 "/home/kjetil/radium/bin/sounds" 'plugin_usage_VST3_-_Uhbik_-_Uhbik-F "2" 'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin "1" 'vst_path4 "/usr/local/lib/vst" 'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 "1" 'vst_path8 "/home/kjetil/.vst3/VariSpeed.vst3/Contents/x86_64-linux" 'scrolls_per_second "20" 'plugin_usage_VST3_-_Uhbik_-_Uhbik-D "2" 'plugin_usage_VST3_-_Uhbik_-_Uhbik-T "1" 'plugin_usage_VST3_-_vitalium_-_Vitalium "1" 'plugin_usage_VST_-_Uhbik.64_-_Runciter "8" 'filebrowser_sequencer-right-part_curr-settings-num "0" 'midi_input_port_2 "Virtual Keyboard (2)" '(symbol "plugin_usage_Ladspa_-__-_Chebyshev distortion") "1" ...)
radium> result: "(hash-table
  'font \"Cousine,11,-1,5,75,0,0,0,0,0\"
  'vst_path0 \"C:/Program Files (x86)/VSTPlugins\"
  '(symbol \"plugin_usage_Ladspa_-__-_Pointer cast distortion\") \"1\"
  '(symbol \"plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player\") \"122\"
  'vst_path7 \"/home/kjetil/.vst\"
  'system_font_style \"Black\"
  'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono \"1\"
  '(symbol \"plugin_usage_Ladspa_-__-_TAP Equalizer/BW\") \"1\"
  'num_cpus \"4\"
  '(symbol \"plugin_usage_Ladspa_-__-_Crossover distortion\") \"1\"
  'plugin_usage_Ladspa_-__-_Disintegrator \"1\"
  'audio_device \"<?xml version=\\\"1.0\\\" encoding=\\\"UTF-8\\\"?>  <DEVICESETUP deviceType=\\\"ALSA\\\" audioOutputDeviceName=\\\"HDA Intel, ALC1200 Analog; Front speakers\\\"              audioInputDeviceName=\\\"\\\" audioDeviceRate=\\\"44100.0\\\" audioDeviceBufferSize=\\\"1024\\\"/>\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-G \"2\"
  'samples_dir \"/tmp/radium_bin/sounds\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-P \"1\"
  'filebrowser_sequencer-right-part_3 \"/home/kjetil/radium/bin/sounds\"
  'always_record_midi_velocity \"false\"
  'plugin_usage_VST_-_3BandEQ_-_3BandEQ \"1\"
  'filebrowser_sequencer-right-part_0 \"/home/kjetil/radium/bin/sounds\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-F \"2\"
  'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin \"1\"
  'vst_path4 \"/usr/local/lib/vst\"
  'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 \"1\"
  'vst_path8 \"/home/kjetil/.vst3/VariSpeed.vst3/Contents/x86_64-linux\"
  'scrolls_per_second \"20\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-D \"2\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-T \"1\"
  'plugin_usage_VST3_-_vitalium_-_Vitalium \"1\"
  'plugin_usage_VST_-_Uhbik.64_-_Runciter \"8\"
  'filebrowser_sequencer-right-part_curr-settings-num \"0\"
  'midi_input_port_2 \"Virtual Keyboard (2)\"
  '(symbol \"plugin_usage_Ladspa_-__-_Chebyshev distortion\") \"1\"
  'help_window_is_child_of_main_window \"true\"
  'filebrowser_sequencer-right-part_1 \"/tmp\"
  'system_font \"Lato,10,-1,5,87,0,0,0,0,0,Black\"
  '(symbol \"plugin_usage_Faust Dev_-__-_Faust Dev\") \"15\"
  'latest_informed_update_version \"6.9.86\"
  'font_style \"Regular\"
  '(symbol \"plugin_usage_Ladspa_-__-_Barry's Satan Maximiser\") \"1\"
  'blocklist_width \"818\"
  'num_vst_paths \"9\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-S \"2\"
  'left_slider_width \"8\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-A \"3\"
  'vst_path3 \"/usr/lib/vst\"
  'position_sequencer_widget_in_mixer \"false\"
  'override_default_qt_style \"true\"
  'use_0x90_for_note_off \"0\"
  'plugin_usage_FluidSynth_-__-_FluidSynth \"2\"
  'plugin_usage_VST3_-_Uhbik_-_Runciter \"7\"
  'vst_path1 \"C:/Program Files/Common Files/VST3\"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-D \"1\"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-A \"12\"
  'plugin_usage_Bus_-__-_Bus \"57\"
  'record_midi_accurately \"true\"
  'plugin_usage_VST_-_compressor-stereo_-_compressor-stereo \"1\"
  '(symbol \"plugin_usage_Ladspa_-__-_C* AmpV - Tube amp\") \"1\"
  'bottom_slider_height \"14\"
  '(symbol \"plugin_usage_Ladspa_-__-_DJ EQ (mono)\") \"1\"
  'midi_input_port_1 \"Virtual Keyboard\"
  'show_tap_plugins_warning \"false\"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-F \"1\"
  '(symbol \"plugin_usage_Ladspa_-__-_LS Filter\") \"1\"
  '(symbol \"plugin_usage_Sample Player_-__-_Sample Player\") \"401\"
  'plugin_usage_Send_-__-_Send \"1\"
  '(symbol \"plugin_usage_Ladspa_-__-_Foldover distortion\") \"1\"
  'vst_path2 \"C:/Program Files (x86)/Common Files/VST3\"
  '(symbol \"plugin_usage_Ladspa_-__-_Calf Reverb LADSPA\") \"1\"
  'show_linenumbers \"false\"
  'filerequester_song_path \"/tmp\"
  'settings_version \"0.73\"
  'vst_path6 \"/home/kjetil/.vst3\"
  'last_editor_font_version \"3.0.b2.3\"
  'midi_input_port_0 \"Virtual Keyboard\"
  'plugin_usage_Pipe_-__-_Pipe \"1\"
  'plugin_usage_VST_-_vitalium_-_vitalium \"1\"
  'midi_num_inports \"1\"
  '(symbol \"plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA\") \"1\"
  'vst_path5 \"/home/kjetil/.u-he\"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-Q \"3\"
  '(symbol \"plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA\") \"1\"
  'plugin_usage_Pd_-__-_NoteEvents \"1\"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-S \"1\"
  '(symbol \"plugin_usage_Ladspa_-__-_Simple amplifier\") \"1\"
  'last_system_font_version \"1.9.21\")"
radium> (hash-table
  'font "Cousine,11,-1,5,75,0,0,0,0,0"
  'vst_path0 "C:/Program Files (x86)/VSTPlugins"
  '(symbol "plugin_usage_Ladspa_-__-_Pointer cast distortion") "1"
  '(symbol "plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player") "122"
  'vst_path7 "/home/kjetil/.vst"
  'system_font_style "Black"
  'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono "1"
  '(symbol "plugin_usage_Ladspa_-__-_TAP Equalizer/BW") "1"
  'num_cpus "4"
  '(symbol "plugin_usage_Ladspa_-__-_Crossover distortion") "1"
  'plugin_usage_Ladspa_-__-_Disintegrator "1"
  'audio_device "<?xml version=\"1.0\" encoding=\"UTF-8\"?>  <DEVICESETUP deviceType=\"ALSA\" audioOutputDeviceName=\"HDA Intel, ALC1200 Analog; Front speakers\"              audioInputDeviceName=\"\" audioDeviceRate=\"44100.0\" audioDeviceBufferSize=\"1024\"/>"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-G "2"
  'samples_dir "/tmp/radium_bin/sounds"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-P "1"
  'filebrowser_sequencer-right-part_3 "/home/kjetil/radium/bin/sounds"
  'always_record_midi_velocity "false"
  'plugin_usage_VST_-_3BandEQ_-_3BandEQ "1"
  'filebrowser_sequencer-right-part_0 "/home/kjetil/radium/bin/sounds"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-F "2"
  'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin "1"
  'vst_path4 "/usr/local/lib/vst"
  'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 "1"
  'vst_path8 "/home/kjetil/.vst3/VariSpeed.vst3/Contents/x86_64-linux"
  'scrolls_per_second "20"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-D "2"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-T "1"
  'plugin_usage_VST3_-_vitalium_-_Vitalium "1"
  'plugin_usage_VST_-_Uhbik.64_-_Runciter "8"
  'filebrowser_sequencer-right-part_curr-settings-num "0"
  'midi_input_port_2 "Virtual Keyboard (2)"
  '(symbol "plugin_usage_Ladspa_-__-_Chebyshev distortion") "1"
  'help_window_is_child_of_main_window "true"
  'filebrowser_sequencer-right-part_1 "/tmp"
  'system_font "Lato,10,-1,5,87,0,0,0,0,0,Black"
  '(symbol "plugin_usage_Faust Dev_-__-_Faust Dev") "15"
  'latest_informed_update_version "6.9.86"
  'font_style "Regular"
  '(symbol "plugin_usage_Ladspa_-__-_Barry's Satan Maximiser") "1"
  'blocklist_width "818"
  'num_vst_paths "9"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-S "2"
  'left_slider_width "8"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-A "3"
  'vst_path3 "/usr/lib/vst"
  'position_sequencer_widget_in_mixer "false"
  'override_default_qt_style "true"
  'use_0x90_for_note_off "0"
  'plugin_usage_FluidSynth_-__-_FluidSynth "2"
  'plugin_usage_VST3_-_Uhbik_-_Runciter "7"
  'vst_path1 "C:/Program Files/Common Files/VST3"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-D "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-A "12"
  'plugin_usage_Bus_-__-_Bus "57"
  'record_midi_accurately "true"
  'plugin_usage_VST_-_compressor-stereo_-_compressor-stereo "1"
  '(symbol "plugin_usage_Ladspa_-__-_C* AmpV - Tube amp") "1"
  'bottom_slider_height "14"
  '(symbol "plugin_usage_Ladspa_-__-_DJ EQ (mono)") "1"
  'midi_input_port_1 "Virtual Keyboard"
  'show_tap_plugins_warning "false"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-F "1"
  '(symbol "plugin_usage_Ladspa_-__-_LS Filter") "1"
  '(symbol "plugin_usage_Sample Player_-__-_Sample Player") "401"
  'plugin_usage_Send_-__-_Send "1"
  '(symbol "plugin_usage_Ladspa_-__-_Foldover distortion") "1"
  'vst_path2 "C:/Program Files (x86)/Common Files/VST3"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Reverb LADSPA") "1"
  'show_linenumbers "false"
  'filerequester_song_path "/tmp"
  'settings_version "0.73"
  'vst_path6 "/home/kjetil/.vst3"
  'last_editor_font_version "3.0.b2.3"
  'midi_input_port_0 "Virtual Keyboard"
  'plugin_usage_Pipe_-__-_Pipe "1"
  'plugin_usage_VST_-_vitalium_-_vitalium "1"
  'midi_num_inports "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA") "1"
  'vst_path5 "/home/kjetil/.u-he"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-Q "3"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA") "1"
  'plugin_usage_Pd_-__-_NoteEvents "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-S "1"
  '(symbol "plugin_usage_Ladspa_-__-_Simple amplifier") "1"
  'last_system_font_version "1.9.21")result: #<unspecified>
radium> (hash-table
  '(symbol "plugin_usage_Ladspa_-__-_Pointer cast distortion") "1"
  '(symbol "plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player") "122"
  'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono "1"
  '(symbol "plugin_usage_Ladspa_-__-_TAP Equalizer/BW") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Crossover distortion") "1"
  'plugin_usage_Ladspa_-__-_Disintegrator "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-G "2"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-P "1"
  'plugin_usage_VST_-_3BandEQ_-_3BandEQ "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-F "2"
  'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin "1"
  'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-D "2"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-T "1"
  'plugin_usage_VST3_-_vitalium_-_Vitalium "1"
  'plugin_usage_VST_-_Uhbik.64_-_Runciter "8"
  '(symbol "plugin_usage_Ladspa_-__-_Chebyshev distortion") "1"
  '(symbol "plugin_usage_Faust Dev_-__-_Faust Dev") "15"
  '(symbol "plugin_usage_Ladspa_-__-_Barry's Satan Maximiser") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-S "2"
  '(symbol "plugin_usage_Ladspa_-__-_LS Filter") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-A "3"
  '(symbol "plugin_usage_Sample Player_-__-_Sample Player") "401"
  'plugin_usage_Send_-__-_Send "1"
  '(symbol "plugin_usage_Ladspa_-__-_Foldover distortion") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Reverb LADSPA") "1"
  'plugin_usage_FluidSynth_-__-_FluidSynth "2"
  'plugin_usage_VST3_-_Uhbik_-_Runciter "7"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-D "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-A "12"
  'plugin_usage_Bus_-__-_Bus "57"
  'plugin_usage_Pipe_-__-_Pipe "1"
  'plugin_usage_VST_-_compressor-stereo_-_compressor-stereo "1"
  'plugin_usage_VST_-_vitalium_-_vitalium "1"
  '(symbol "plugin_usage_Ladspa_-__-_C* AmpV - Tube amp") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA") "1"
  '(symbol "plugin_usage_Ladspa_-__-_DJ EQ (mono)") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-Q "3"
  'plugin_usage_Pd_-__-_NoteEvents "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-F "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA") "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-S "1"
  '(symbol "plugin_usage_Ladspa_-__-_Simple amplifier") "1")result: #<unspecified>
radium> result: "FluidSynth_-__-_FluidSynth"
radium> result: "FluidSynth_-__-_FluidSynth"
radium> result: 3
radium> result: 2
radium> result: 0
radium> result: #f
radium> FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (wrong-type-arg ("~A argument ~D, ~S, is ~A but should be ~A" "char=?" 1 "_-_" "a string" "a character"))



error: wrong-type-arg char=? argument 1, "_-_", is a string but should be a character

error-code: (cond ((null? after) (list (reverse! before) '())) ((func (car after)) (list (reverse! before) after)) (else (loop (cons (car after) before) (cdr after))))

error-file/line: scheme/common1.scm[673]

error-history: 

"(cond ((null? after) (list (reverse! before) '())) ((func (car after)) (list (reverse! before) after)) (else (loop (cons (car after) before) (cdr after))))"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "(let* ((prefix \\"plugin_usage_\\")
       (pos (string-length prefix))
       (typeandname (string-drop (symbol->string 'plugin_usage_FluidSynth_-__-_FluidSynth)
                                 pos)))
  (let ((strings (string-split typeandname \\"_-_\\")))
    strings))" (rootlet))"


(ch2 . #\F) 

(ch . "_-_") (string* . "FluidSynth_-__-_FluidSynth") 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> 
"Correct: ""(a c)"""
result: #t
radium> FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (wrong-type-arg ("~A argument ~D, ~S, is ~A but should be ~A" "char=?" 1 "," "a string" "a character"))



error: wrong-type-arg char=? argument 1, ",", is a string but should be a character

error-code: (cond ((null? after) (list (reverse! before) '())) ((func (car after)) (list (reverse! before) after)) (else (loop (cons (car after) before) (cdr after))))

error-file/line: #f[673]

error-history: 

"(cond ((null? after) (list (reverse! before) '())) ((func (car after)) (list (reverse! before) after)) (else (loop (cons (car after) before) (cdr after))))"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "(***assert*** (string-split \\"a,c\\" \\",\\")
              (list \\"a\\" \\"c\\"))" (rootlet))"


(ch2 . #\a) 

(ch . ",") (string* . "a,c") 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> result: #("a" "c")
radium> 
vector-to-string
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "vector-to-string" has not been defined when parsing atom=========
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (unbound-variable ("unbound variable ~S in ~S" vector-to-string vector-to-string))



error: unbound-variable unbound variable vector-to-string in vector-to-string

error-code: vector-to-string

error-file/line: #f[673]

error-history: 

"vector-to-string"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "vector-to-string" (rootlet))"


    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> vector->string
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "vector->string" has not been defined when parsing atom=========
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (unbound-variable ("unbound variable ~S in ~S" vector->string vector->string))



error: unbound-variable unbound variable vector->string in vector->string

error-code: vector->string

error-file/line: #f[673]

error-history: 

"vector->string"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "vector->string" (rootlet))"


    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> vector2string
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "vector2string" has not been defined when parsing atom=========
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (unbound-variable ("unbound variable ~S in ~S" vector2string vector2string))



error: unbound-variable unbound variable vector2string in vector2string

error-code: vector2string

error-file/line: #f[673]

error-history: 

"vector2string"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "vector2string" (rootlet))"


    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> Warning: Redefining string-split #<lambda (string* ch)>
. 
result: string-split
radium> 
"Correct: ""(a c)"""
result: #t
radium> 
"Correct: ""(a c)"""
result: #t
radium> result: #("FluidSynth" "FluidSynth")
radium> result: #("FluidSynth" "" "FluidSynth")
radium> result: ("FluidSynth" "FluidSynth")
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (out-of-range ("~A argument ~D, ~S, is out of range (~A)" "list-ref" 2 2 "it is too large"))



error: out-of-range list-ref argument 2, 2, is out of range (it is too large)

error-code: (cond ((string? ch) (vector->list (ra:string-split string* ch))) ((string=? string* "") '()) (else (let ((splitted (split-list (string->list string*) (lambda (ch2) (char=? ch ch2))))) (cond ((null? (cadr splitted)) (list string*)) ((null? (car splitted)) (string-split (list->string (cdr (cadr splitted))) ch)) (else (cons (list->string (car splitted)) (string-split (list->string (cdr (cadr splitted))) ch)))))))

error-file/line: *stdout*[673]

error-history: 

"(cond ((string? ch) (vector->list (ra:string-split string* ch))) ((string=? string* "") '()) (else (let ((splitted (split-list (string->list string*) (lambda (ch2) (char=? ch ch2))))) (cond ((null? (cadr splitted)) (list string*)) ((null? (car splitted)) (string-split (list->string (cdr (cadr splitted))) ch)) (else (cons (list->string (car splitted)) (string-split (list->string (cdr (cadr splitted))) ch)))))))"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "(let* ((prefix \\"plugin_usage_\\")
       (pos (string-length prefix))
       (typeandname (string-drop (symbol->string 'plugin_usage_FluidSynth_-__-_FluidSynth)
                                 pos))
       (strings (string-split typeandname \\"_-_\\"))
       (type-name (strings 0))
       (container-name (strings 1))
       (plugin-name (strings 2)))
  (list type-name container-name plugin-name))" (rootlet))"


(container-name . "FluidSynth") 

(type-name . "FluidSynth") 

(strings "FluidSynth" "FluidSynth") 

(typeandname . "FluidSynth_-__-_FluidSynth") 

(pos . 13) 

(prefix . "plugin_usage_") 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: ("FluidSynth" "" "FluidSynth")
radium> (hash-table
  '(symbol "plugin_usage_Ladspa_-__-_C* AmpV - Tube amp") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Foldover distortion") "1"
  'plugin_usage_FluidSynth_-__-_FluidSynth "2"
  'plugin_usage_Pipe_-__-_Pipe "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-Q "3"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-F "2"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-D "1"
  'plugin_usage_VST_-_3BandEQ_-_3BandEQ "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-S "2"
  'plugin_usage_VST3_-_vitalium_-_Vitalium "1"
  '(symbol "plugin_usage_Ladspa_-__-_DJ EQ (mono)") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Pointer cast distortion") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA") "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-F "1"
  'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Reverb LADSPA") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Chebyshev distortion") "1"
  'plugin_usage_Ladspa_-__-_Disintegrator "1"
  '(symbol "plugin_usage_Sample Player_-__-_Sample Player") "401"
  '(symbol "plugin_usage_Ladspa_-__-_TAP Equalizer/BW") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-G "2"
  '(symbol "plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player") "122"
  'plugin_usage_Bus_-__-_Bus "57"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-T "1"
  'plugin_usage_Send_-__-_Send "1"
  'plugin_usage_VST_-_vitalium_-_vitalium "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-D "2"
  '(symbol "plugin_usage_Ladspa_-__-_Simple amplifier") "1"
  'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin "1"
  'plugin_usage_VST3_-_Uhbik_-_Runciter "7"
  '(symbol "plugin_usage_Faust Dev_-__-_Faust Dev") "15"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-P "1"
  'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono "1"
  'plugin_usage_VST_-_Uhbik.64_-_Runciter "8"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-A "3"
  'plugin_usage_Pd_-__-_NoteEvents "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-S "1"
  '(symbol "plugin_usage_Ladspa_-__-_Barry's Satan Maximiser") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Crossover distortion") "1"
  'plugin_usage_VST_-_compressor-stereo_-_compressor-stereo "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-A "12"
  '(symbol "plugin_usage_Ladspa_-__-_LS Filter") "1")result: #<unspecified>
radium> ('plugin_usage_Ladspa_-__-_C* AmpV - Tube amp . 1) 
('plugin_usage_Ladspa_-__-_Foldover distortion . 1) 
('plugin_usage_FluidSynth_-__-_FluidSynth . 2) 
('plugin_usage_Pipe_-__-_Pipe . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-Q . 3) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-F . 2) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-D . 1) 
('plugin_usage_VST_-_3BandEQ_-_3BandEQ . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-S . 2) 
('plugin_usage_VST3_-_vitalium_-_Vitalium . 1) 
('plugin_usage_Ladspa_-__-_DJ EQ (mono) . 1) 
('plugin_usage_Ladspa_-__-_Pointer cast distortion . 1) 
('plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-F . 1) 
('plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 . 1) 
('plugin_usage_Ladspa_-__-_Calf Reverb LADSPA . 1) 
('plugin_usage_Ladspa_-__-_Chebyshev distortion . 1) 
('plugin_usage_Ladspa_-__-_Disintegrator . 1) 
('plugin_usage_Sample Player_-__-_Sample Player . 401) 
('plugin_usage_Ladspa_-__-_TAP Equalizer/BW . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-G . 2) 
('plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player . 122) 
('plugin_usage_Bus_-__-_Bus . 57) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-T . 1) 
('plugin_usage_Send_-__-_Send . 1) 
('plugin_usage_VST_-_vitalium_-_vitalium . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-D . 2) 
('plugin_usage_Ladspa_-__-_Simple amplifier . 1) 
('plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin . 1) 
('plugin_usage_VST3_-_Uhbik_-_Runciter . 7) 
('plugin_usage_Faust Dev_-__-_Faust Dev . 15) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-P . 1) 
('plugin_usage_VST_-_art-delay-mono_-_art-delay-mono . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Runciter . 8) 
('plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-A . 3) 
('plugin_usage_Pd_-__-_NoteEvents . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-S . 1) 
('plugin_usage_Ladspa_-__-_Barry's Satan Maximiser . 1) 
('plugin_usage_Ladspa_-__-_Crossover distortion . 1) 
('plugin_usage_VST_-_compressor-stereo_-_compressor-stereo . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-A . 12) 
('plugin_usage_Ladspa_-__-_LS Filter . 1) 
result: #<unspecified>
radium> FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (wrong-number-of-args ("for-each ~A: ~A argument~P?" #<lambda (a b)> 1 1))



error: wrong-number-of-args for-each #: 1 argument?

error-code: (for-each (lambda (a b) (c-display a "." b)) (ra:get-settings-keys-starting-with "plugin_usage_"))

error-file/line: #f[673]

error-history: 

"(for-each (lambda (a b) (c-display a "." b)) (ra:get-settings-keys-starting-with "plugin_usage_"))"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "(for-each (lambda (a b)
            (c-display a \\".\\" b))
          (<ra> :get-settings-keys-starting-with \\"plugin_usage_\\"))" (rootlet))"


    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> ('plugin_usage_Ladspa_-__-_C* AmpV - Tube amp . 1) 
('plugin_usage_Ladspa_-__-_Foldover distortion . 1) 
('plugin_usage_FluidSynth_-__-_FluidSynth . 2) 
('plugin_usage_Pipe_-__-_Pipe . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-Q . 3) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-F . 2) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-D . 1) 
('plugin_usage_VST_-_3BandEQ_-_3BandEQ . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-S . 2) 
('plugin_usage_VST3_-_vitalium_-_Vitalium . 1) 
('plugin_usage_Ladspa_-__-_DJ EQ (mono) . 1) 
('plugin_usage_Ladspa_-__-_Pointer cast distortion . 1) 
('plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-F . 1) 
('plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 . 1) 
('plugin_usage_Ladspa_-__-_Calf Reverb LADSPA . 1) 
('plugin_usage_Ladspa_-__-_Chebyshev distortion . 1) 
('plugin_usage_Ladspa_-__-_Disintegrator . 1) 
('plugin_usage_Sample Player_-__-_Sample Player . 401) 
('plugin_usage_Ladspa_-__-_TAP Equalizer/BW . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-G . 2) 
('plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player . 122) 
('plugin_usage_Bus_-__-_Bus . 57) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-T . 1) 
('plugin_usage_Send_-__-_Send . 1) 
('plugin_usage_VST_-_vitalium_-_vitalium . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-D . 2) 
('plugin_usage_Ladspa_-__-_Simple amplifier . 1) 
('plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin . 1) 
('plugin_usage_VST3_-_Uhbik_-_Runciter . 7) 
('plugin_usage_Faust Dev_-__-_Faust Dev . 15) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-P . 1) 
('plugin_usage_VST_-_art-delay-mono_-_art-delay-mono . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Runciter . 8) 
('plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA . 1) 
('plugin_usage_VST3_-_Uhbik_-_Uhbik-A . 3) 
('plugin_usage_Pd_-__-_NoteEvents . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-S . 1) 
('plugin_usage_Ladspa_-__-_Barry's Satan Maximiser . 1) 
('plugin_usage_Ladspa_-__-_Crossover distortion . 1) 
('plugin_usage_VST_-_compressor-stereo_-_compressor-stereo . 1) 
('plugin_usage_VST_-_Uhbik.64_-_Uhbik-A . 12) 
('plugin_usage_Ladspa_-__-_LS Filter . 1) 
result: #<unspecified>
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: #<unspecified>
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: (("Ladspa" "" "C* AmpV - Tube amp" "1") ("Ladspa" "" "Foldover distortion" "1") ("FluidSynth" "" "FluidSynth" "2") ("Pipe" "" "Pipe" "1") ("VST3" "Uhbik" "Uhbik-Q" "3") ("VST3" "Uhbik" "Uhbik-F" "2") ("VST" "Uhbik.64" "Uhbik-D" "1") ("VST" "3BandEQ" "3BandEQ" "1") ("VST3" "Uhbik" "Uhbik-S" "2") ("VST3" "vitalium" "Vitalium" "1") ("Ladspa" "" "DJ EQ (mono)" "1") ("Ladspa" "" "Pointer cast distortion" "1") ("Ladspa" "" "Calf Bass Enhancer LADSPA" "1") ("VST" "Uhbik.64" "Uhbik-F" "1") ("VST" "spectrum-analyzer-x8" "spectrum-analyzer-x8" "1") ("Ladspa" "" "Calf Reverb LADSPA" "1") ("Ladspa" "" "Chebyshev distortion" "1") ("Ladspa" "" "Disintegrator" "1") ("Sample Player" "" "Sample Player" "401") ("Ladspa" "" "TAP Equalizer/BW" "1") ("VST3" "Uhbik" "Uhbik-G" "2") ("Sequencer audio file recorder/player" "" "Sequencer audio file recorder/player" "122") ("Bus" "" "Bus" "57") ("VST3" "Uhbik" "Uhbik-T" "1") ("Send" "" "Send" "1") ("VST" "vitalium" "vitalium" "1") ("VST3" "Uhbik" "Uhbik-D" "2") ("Ladspa" "" "Simple amplifier" "1") ("VST" "JuceDemoPlugin" "JuceDemoPlugin" "1") ("VST3" "Uhbik" "Runciter" "7") ("Faust Dev" "" "Faust Dev" "15") ("VST3" "Uhbik" "Uhbik-P" "1") ...)
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: (("Ladspa" "" "C* AmpV - Tube amp" 1) ("Ladspa" "" "Foldover distortion" 1) ("FluidSynth" "" "FluidSynth" 2) ("Pipe" "" "Pipe" 1) ("VST3" "Uhbik" "Uhbik-Q" 3) ("VST3" "Uhbik" "Uhbik-F" 2) ("VST" "Uhbik.64" "Uhbik-D" 1) ("VST" "3BandEQ" "3BandEQ" 1) ("VST3" "Uhbik" "Uhbik-S" 2) ("VST3" "vitalium" "Vitalium" 1) ("Ladspa" "" "DJ EQ (mono)" 1) ("Ladspa" "" "Pointer cast distortion" 1) ("Ladspa" "" "Calf Bass Enhancer LADSPA" 1) ("VST" "Uhbik.64" "Uhbik-F" 1) ("VST" "spectrum-analyzer-x8" "spectrum-analyzer-x8" 1) ("Ladspa" "" "Calf Reverb LADSPA" 1) ("Ladspa" "" "Chebyshev distortion" 1) ("Ladspa" "" "Disintegrator" 1) ("Sample Player" "" "Sample Player" 401) ("Ladspa" "" "TAP Equalizer/BW" 1) ("VST3" "Uhbik" "Uhbik-G" 2) ("Sequencer audio file recorder/player" "" "Sequencer audio file recorder/player" 122) ("Bus" "" "Bus" 57) ("VST3" "Uhbik" "Uhbik-T" 1) ("Send" "" "Send" 1) ("VST" "vitalium" "vitalium" 1) ("VST3" "Uhbik" "Uhbik-D" 2) ("Ladspa" "" "Simple amplifier" 1) ("VST" "JuceDemoPlugin" "JuceDemoPlugin" 1) ("VST3" "Uhbik" "Runciter" 7) ("Faust Dev" "" "Faust Dev" 15) ("VST3" "Uhbik" "Uhbik-P" 1) ...)
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(a :num-uses)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(b :num-uses)'. #f: #f...(suppressing rest)... 
result: ((hash-table :num-uses 1 :plugin-name "Calf Reverb LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "art-delay-mono" :container-name "art-delay-mono" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Uhbik-P" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Disintegrator" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Chebyshev distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Barry's Satan Maximiser" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "NoteEvents" :container-name "" :type-name "Pd") (hash-table :num-uses 1 :plugin-name "Crossover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Equalizer 8 Band LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Foldover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Bass Enhancer LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Pipe" :container-name "" :type-name "Pipe") (hash-table :num-uses 1 :plugin-name "3BandEQ" :container-name "3BandEQ" :type-name "VST") (hash-table :num-uses 1 :plugin-name "compressor-stereo" :container-name "compressor-stereo" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Uhbik-S" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Vitalium" :container-name "vitalium" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "TAP Equalizer/BW" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "LS Filter" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "DJ EQ (mono)" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Pointer cast distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-T" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Send" :container-name "" :type-name "Send") (hash-table :num-uses 1 :plugin-name "vitalium" :container-name "vitalium" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Uhbik-F" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Simple amplifier" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "JuceDemoPlugin" :container-name "JuceDemoPlugin" :type-name "VST") (hash-table :num-uses 1 :plugin-name "spectrum-analyzer-x8" :container-name "spectrum-analyzer-x8" :type-name "VST") (hash-table :num-uses 2 :plugin-name "Uhbik-D" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-G" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-F" :container-name "Uhbik" :type-name "VST3") ...)
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(a :num-uses)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(b :num-uses)'. #f: #f...(suppressing rest)... 
result: ((hash-table :num-uses 401 :plugin-name "Sample Player" :container-name "" :type-name "Sample Player") (hash-table :num-uses 122 :plugin-name "Sequencer audio file recorder/player" :container-name "" :type-name "Sequencer audio file recorder/player") (hash-table :num-uses 57 :plugin-name "Bus" :container-name "" :type-name "Bus") (hash-table :num-uses 15 :plugin-name "Faust Dev" :container-name "" :type-name "Faust Dev") (hash-table :num-uses 12 :plugin-name "Uhbik-A" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 8 :plugin-name "Runciter" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 7 :plugin-name "Runciter" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 3 :plugin-name "Uhbik-A" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 3 :plugin-name "Uhbik-Q" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "FluidSynth" :container-name "" :type-name "FluidSynth") (hash-table :num-uses 2 :plugin-name "Uhbik-F" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-S" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-D" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-G" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "art-delay-mono" :container-name "art-delay-mono" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Disintegrator" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Equalizer 8 Band LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-S" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Vitalium" :container-name "vitalium" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "TAP Equalizer/BW" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Crossover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "compressor-stereo" :container-name "compressor-stereo" :type-name "VST") (hash-table :num-uses 1 :plugin-name "DJ EQ (mono)" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "LS Filter" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Pointer cast distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-T" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Chebyshev distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Send" :container-name "" :type-name "Send") (hash-table :num-uses 1 :plugin-name "Calf Bass Enhancer LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "vitalium" :container-name "vitalium" :type-name "VST") (hash-table :num-uses 1 :plugin-name "NoteEvents" :container-name "" :type-name "Pd") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") ...)
radium> result: "plugin_usage_"
radium> ******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(a :num-uses)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(b :num-uses)'. #f: #f...(suppressing rest)... 
result: ((hash-table :num-uses 401 :plugin-name "Sample Player" :container-name "" :type-name "Sample Player") (hash-table :num-uses 122 :plugin-name "Sequencer audio file recorder/player" :container-name "" :type-name "Sequencer audio file recorder/player") (hash-table :num-uses 57 :plugin-name "Bus" :container-name "" :type-name "Bus") (hash-table :num-uses 15 :plugin-name "Faust Dev" :container-name "" :type-name "Faust Dev") (hash-table :num-uses 12 :plugin-name "Uhbik-A" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 8 :plugin-name "Runciter" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 7 :plugin-name "Runciter" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 3 :plugin-name "Uhbik-A" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 3 :plugin-name "Uhbik-Q" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "FluidSynth" :container-name "" :type-name "FluidSynth") (hash-table :num-uses 2 :plugin-name "Uhbik-F" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-S" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-D" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-G" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "art-delay-mono" :container-name "art-delay-mono" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Disintegrator" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Equalizer 8 Band LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-S" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Vitalium" :container-name "vitalium" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "TAP Equalizer/BW" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Crossover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "compressor-stereo" :container-name "compressor-stereo" :type-name "VST") (hash-table :num-uses 1 :plugin-name "DJ EQ (mono)" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "LS Filter" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Pointer cast distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-T" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Chebyshev distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Send" :container-name "" :type-name "Send") (hash-table :num-uses 1 :plugin-name "Calf Bass Enhancer LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "vitalium" :container-name "vitalium" :type-name "VST") (hash-table :num-uses 1 :plugin-name "NoteEvents" :container-name "" :type-name "Pd") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") ...)
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "sort" in (sort (keep (lambda (a) (or (string=? (a :type-name "VST")) (string=? (a :type-name "AU")) (string=? (a :type-name "Ladspa")) (string=? (a :type-name "Pd")) (string-starts-with (a :type-name "STK")))) (map (lambda (a) (let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))) (ra:get-settings-keys-starting-with *plugin-usage-prefix*)) (lambda (a b) (>= (a :num-uses) (b :num-uses))))). Arity:(2 . 2)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "keep" in (keep (lambda (a) (or (string=? (a :type-name "VST")) (string=? (a :type-name "AU")) (string=? (a :type-name "Ladspa")) (string=? (a :type-name "Pd")) (string-starts-with (a :type-name "STK")))) (map (lambda (a) (let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))) (ra:get-settings-keys-starting-with *plugin-usage-prefix*)) (lambda (a b) (>= (a :num-uses) (b :num-uses)))). Arity:(2 . 2)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "VST")). Arity:(2 . 536870912)=========
******* Note from mylint: Higher order function call detected for expression: '(a :type-name "VST")'. #f: #f 
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 1 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "AU")). Arity:(2 . 536870912)=========
******* Note from mylint: Higher order function call detected for expression: '(a :type-name "AU")'. #f: #f...(suppressing rest)... 
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 0 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "Ladspa")). Arity:(2 . 536870912)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -1 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "Pd")). Arity:(2 . 536870912)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "string-starts-with" has not been defined in function call (string-starts-with (a :type-name "STK"))=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "string-starts-with" has not been defined when parsing atom=========
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (wrong-number-of-args ("~S: too many arguments: ~A" keep (#<lambda (a)> ((hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Foldover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 2 :plugin-name "FluidSynth" :container-name "" :type-name "FluidSynth") (hash-table :num-uses 1 :plugin-name "Pipe" :container-name "" :type-name "Pipe") (hash-table :num-uses 3 :plugin-name "Uhbik-Q" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-F" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "3BandEQ" :container-name "3BandEQ" :type-name "VST") (hash-table :num-uses 2 :plugin-name "Uhbik-S" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Vitalium" :container-name "vitalium" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "DJ EQ (mono)" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Pointer cast distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Bass Enhancer LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-F" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "spectrum-analyzer-x8" :container-name "spectrum-analyzer-x8" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Calf Reverb LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Chebyshev distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Disintegrator" :container-name "" :type-name "Ladspa") (hash-table :num-uses 401 :plugin-name "Sample Player" :container-name "" :type-name "Sample Player") (hash-table :num-uses 1 :plugin-name "TAP Equalizer/BW" :container-name "" :type-name "Ladspa") (hash-table :num-uses 2 :plugin-name "Uhbik-G" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 122 :plugin-name "Sequencer audio file recorder/player" :container-name "" :type-name "Sequencer audio file recorder/player") (hash-table :num-uses 57 :plugin-name "Bus" :container-name "" :type-name "Bus") (hash-table :num-uses 1 :plugin-name "Uhbik-T" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Send" :container-name "" :type-name "Send") (hash-table :num-uses 1 :plugin-name "vitalium" :container-name "vitalium" :type-name "VST") (hash-table :num-uses 2 :plugin-name "Uhbik-D" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Simple amplifier" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "JuceDemoPlugin" :container-name "JuceDemoPlugin" :type-name "VST") (hash-table :num-uses 7 :plugin-name "Runciter" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 15 :plugin-name "Faust Dev" :container-name "" :type-name "Faust Dev") (hash-table :num-uses 1 :plugin-name "Uhbik-P" :container-name "Uhbik" :type-name "VST3") ...) #<lambda (a b)>)))



error: wrong-number-of-args keep: too many arguments: (# ((hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Foldover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 2 :plugin-name "FluidSynth" :container-name "" :type-name "FluidSynth") (hash-table :num-uses 1 :plugin-name "Pipe" :container-name "" :type-name "Pipe") (hash-table :num-uses 3 :plugin-name "Uhbik-Q" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-F" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "3BandEQ" :container-name "3BandEQ" :type-name "VST") (hash-table :num-uses 2 :plugin-name "Uhbik-S" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Vitalium" :container-name "vitalium" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "DJ EQ (mono)" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Pointer cast distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Bass Enhancer LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-F" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "spectrum-analyzer-x8" :container-name "spectrum-analyzer-x8" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Calf Reverb LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Chebyshev distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Disintegrator" :container-name "" :type-name "Ladspa") (hash-table :num-uses 401 :plugin-name "Sample Player" :container-name "" :type-name "Sample Player") (hash-table :num-uses 1 :plugin-name "TAP Equalizer/BW" :container-name "" :type-name "Ladspa") (hash-table :num-uses 2 :plugin-name "Uhbik-G" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 122 :plugin-name "Sequencer audio file recorder/player" :container-name "" :type-name "Sequencer audio file recorder/player") (hash-table :num-uses 57 :plugin-name "Bus" :container-name "" :type-name "Bus") (hash-table :num-uses 1 :plugin-name "Uhbik-T" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Send" :container-name "" :type-name "Send") (hash-table :num-uses 1 :plugin-name "vitalium" :container-name "vitalium" :type-name "VST") (hash-table :num-uses 2 :plugin-name "Uhbik-D" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Simple amplifier" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "JuceDemoPlugin" :container-name "JuceDemoPlugin" :type-name "VST") (hash-table :num-uses 7 :plugin-name "Runciter" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 15 :plugin-name "Faust Dev" :container-name "" :type-name "Faust Dev") (hash-table :num-uses 1 :plugin-name "Uhbik-P" :container-name "Uhbik" :type-name "VST3") ...) #)

error-code: (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))

error-file/line: *stdout*[673]

error-history: 

"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

1:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

2:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

3:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

4:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

5:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

6:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

7:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

8:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

9:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

10:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

11:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

12:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

13:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

14:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

15:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

16:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

17:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

18:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

19:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

20:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

21:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

22:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

23:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

24:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

25:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

26:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

27:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

28:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

29:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

30:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

31:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

32:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

33:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

34:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

35:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

36:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

37:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

38:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

39:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

40:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

41:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

42:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

43:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

44:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

45:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

46:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

47:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

48:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

49:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

50:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

51:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

52:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

53:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

54:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

55:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

56:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

57:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

58:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

59:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

60:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

61:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

62:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

63:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

64:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

65:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

66:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

67:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

68:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

69:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

70:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

71:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

72:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

73:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

74:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

75:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

76:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

77:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

78:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

79:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"


(list (hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Foldover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 2 :plugin-name "FluidSynth" :container-name "" :type-name "FluidSynth") (hash-table :num-uses 1 :plugin-name "Pipe" :container-name "" :type-name "Pipe") (hash-table :num-uses 3 :plugin-name "Uhbik-Q" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 2 :plugin-name "Uhbik-F" :container-name "Uhbik" :type-name "VST3") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") ...) (func . #) 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "VST")). Arity:(2 . 536870912)=========
******* Note from mylint: Higher order function call detected for expression: '(a :type-name "VST")'. #f: #f 
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 1 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "AU")). Arity:(2 . 536870912)=========
******* Note from mylint: Higher order function call detected for expression: '(a :type-name "AU")'. #f: #f...(suppressing rest)... 
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 0 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "Ladspa")). Arity:(2 . 536870912)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -1 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "Pd")). Arity:(2 . 536870912)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "string-starts-with" has not been defined in function call (string-starts-with (a :type-name "STK"))=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "string-starts-with" has not been defined when parsing atom=========
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (wrong-type-arg ("~A argument ~D, ~S, is ~A but should be ~A" "string-ref" 2 "VST" "a string" "an integer"))



error: wrong-type-arg string-ref argument 2, "VST", is a string but should be an integer

error-code: (if (null? list) '() (if (func (car list)) (cons (car list) (keep func (cdr list))) (keep func (cdr list))))

error-file/line: scheme/mylint.scm[673]

error-history: 

"(if (null? list) '() (if (func (car list)) (cons (car list) (keep func (cdr list))) (keep func (cdr list))))"

1:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

2:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

3:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

4:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

5:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

6:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

7:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

8:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

9:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

10:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

11:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

12:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

13:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

14:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

15:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

16:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

17:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

18:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

19:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

20:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

21:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

22:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

23:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

24:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

25:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

26:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

27:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

28:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

29:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

30:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

31:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

32:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

33:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

34:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

35:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

36:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

37:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

38:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

39:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

40:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

41:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

42:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

43:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

44:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

45:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

46:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

47:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

48:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

49:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

50:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

51:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

52:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

53:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

54:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

55:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

56:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

57:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

58:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

59:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

60:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

61:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

62:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

63:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

64:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

65:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

66:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

67:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

68:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

69:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

70:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

71:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

72:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

73:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

74:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

75:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

76:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

77:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

78:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

79:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"


(a . (hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa")) 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "VST")). Arity:(2 . 536870912)=========
******* Note from mylint: Higher order function call detected for expression: '(a :type-name "VST")'. #f: #f 
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 1 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "AU")). Arity:(2 . 536870912)=========
******* Note from mylint: Higher order function call detected for expression: '(a :type-name "AU")'. #f: #f...(suppressing rest)... 
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 0 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "Ladspa")). Arity:(2 . 536870912)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -1 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string=?" in (string=? (a :type-name "Pd")). Arity:(2 . 536870912)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices -2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "string-starts-with?" in (string-starts-with? (a :type-name "STK")). Arity:(2 . 2)=========
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (wrong-type-arg ("~A argument ~D, ~S, is ~A but should be ~A" "string-ref" 2 "VST" "a string" "an integer"))



error: wrong-type-arg string-ref argument 2, "VST", is a string but should be an integer

error-code: (if (null? list) '() (if (func (car list)) (cons (car list) (keep func (cdr list))) (keep func (cdr list))))

error-file/line: #f[673]

error-history: 

"(if (null? list) '() (if (func (car list)) (cons (car list) (keep func (cdr list))) (keep func (cdr list))))"

1:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

2:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

3:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

4:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

5:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

6:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

7:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

8:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

9:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

10:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

11:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

12:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

13:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

14:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

15:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

16:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

17:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

18:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

19:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

20:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

21:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

22:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

23:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

24:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

25:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

26:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

27:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

28:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

29:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

30:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

31:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

32:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

33:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

34:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

35:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

36:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

37:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

38:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

39:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

40:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

41:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

42:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

43:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

44:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

45:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

46:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

47:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

48:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

49:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

50:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

51:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

52:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

53:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

54:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

55:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

56:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

57:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

58:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

59:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

60:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

61:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

62:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

63:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

64:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

65:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

66:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

67:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

68:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

69:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

70:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

71:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

72:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

73:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

74:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

75:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

76:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

77:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"

78:    
"(let* ((key (car a)) (value (cdr a)) (pos (string-length *plugin-usage-prefix*)) (typeandname (string-drop (symbol->string key) pos)) (strings (string-split typeandname "_-_")) (type-name (strings 0)) (container-name (strings 1)) (plugin-name (strings 2))) (hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value)))"

79:    
"(hash-table :type-name type-name :container-name container-name :plugin-name plugin-name :num-uses (string->number value))"


(a . (hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa")) 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: ((hash-table :num-uses 12 :plugin-name "Uhbik-A" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 8 :plugin-name "Runciter" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "NoteEvents" :container-name "" :type-name "Pd") (hash-table :num-uses 1 :plugin-name "Disintegrator" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "compressor-stereo" :container-name "compressor-stereo" :type-name "VST") (hash-table :num-uses 1 :plugin-name "art-delay-mono" :container-name "art-delay-mono" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Calf Reverb LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Barry's Satan Maximiser" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Pointer cast distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "LS Filter" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Calf Bass Enhancer LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "vitalium" :container-name "vitalium" :type-name "VST") (hash-table :num-uses 1 :plugin-name "spectrum-analyzer-x8" :container-name "spectrum-analyzer-x8" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Calf Equalizer 8 Band LADSPA" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "DJ EQ (mono)" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-S" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Chebyshev distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Crossover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Uhbik-D" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Simple amplifier" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "TAP Equalizer/BW" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "C* AmpV - Tube amp" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "Foldover distortion" :container-name "" :type-name "Ladspa") (hash-table :num-uses 1 :plugin-name "3BandEQ" :container-name "3BandEQ" :type-name "VST") (hash-table :num-uses 1 :plugin-name "Uhbik-F" :container-name "Uhbik.64" :type-name "VST") (hash-table :num-uses 1 :plugin-name "JuceDemoPlugin" :container-name "JuceDemoPlugin" :type-name "VST"))
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: ((hash-table :num-uses 12 :container-name "Uhbik.64" :name "Uhbik-A" :type-name "VST") (hash-table :num-uses 8 :container-name "Uhbik.64" :name "Runciter" :type-name "VST") (hash-table :num-uses 1 :container-name "" :name "NoteEvents" :type-name "Pd") (hash-table :num-uses 1 :container-name "" :name "Disintegrator" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "compressor-stereo" :name "compressor-stereo" :type-name "VST") (hash-table :num-uses 1 :container-name "art-delay-mono" :name "art-delay-mono" :type-name "VST") (hash-table :num-uses 1 :container-name "" :name "Calf Reverb LADSPA" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "Barry's Satan Maximiser" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "Pointer cast distortion" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "LS Filter" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "Calf Bass Enhancer LADSPA" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "vitalium" :name "vitalium" :type-name "VST") (hash-table :num-uses 1 :container-name "spectrum-analyzer-x8" :name "spectrum-analyzer-x8" :type-name "VST") (hash-table :num-uses 1 :container-name "" :name "Calf Equalizer 8 Band LADSPA" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "DJ EQ (mono)" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "Uhbik.64" :name "Uhbik-S" :type-name "VST") (hash-table :num-uses 1 :container-name "" :name "Chebyshev distortion" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "Crossover distortion" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "Uhbik.64" :name "Uhbik-D" :type-name "VST") (hash-table :num-uses 1 :container-name "" :name "Simple amplifier" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "TAP Equalizer/BW" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "C* AmpV - Tube amp" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "" :name "Foldover distortion" :type-name "Ladspa") (hash-table :num-uses 1 :container-name "3BandEQ" :name "3BandEQ" :type-name "VST") (hash-table :num-uses 1 :container-name "Uhbik.64" :name "Uhbik-F" :type-name "VST") (hash-table :num-uses 1 :container-name "JuceDemoPlugin" :name "JuceDemoPlugin" :type-name "VST"))
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :num-uses)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: show-favourite-plugin-menu
radium> result: (("Uhbik-A (12)" #<lambda ()>) ("Runciter (8)" #<lambda ()>) ("NoteEvents (1)" #<lambda ()>) ("Disintegrator (1)" #<lambda ()>) ("compressor-stereo (1)" #<lambda ()>) ("art-delay-mono (1)" #<lambda ()>) ("Calf Reverb LADSPA (1)" #<lambda ()>) ("Barry's Satan Maximiser (1)" #<lambda ()>) ("Pointer cast distortion (1)" #<lambda ()>) ("LS Filter (1)" #<lambda ()>) ("Calf Bass Enhancer LADSPA (1)" #<lambda ()>) ("vitalium (1)" #<lambda ()>) ("spectrum-analyzer-x8 (1)" #<lambda ()>) ("Calf Equalizer 8 Band LADSPA (1)" #<lambda ()>) ("DJ EQ (mono) (1)" #<lambda ()>) ("Uhbik-S (1)" #<lambda ()>) ("Chebyshev distortion (1)" #<lambda ()>) ("Crossover distortion (1)" #<lambda ()>) ("Uhbik-D (1)" #<lambda ()>) ("Simple amplifier (1)" #<lambda ()>) ("TAP Equalizer/BW (1)" #<lambda ()>) ("C* AmpV - Tube amp (1)" #<lambda ()>) ("Foldover distortion (1)" #<lambda ()>) ("3BandEQ (1)" #<lambda ()>) ("Uhbik-F (1)" #<lambda ()>) ("JuceDemoPlugin (1)" #<lambda ()>))
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "get-favourite-plugin-menu-entries" has not been defined in function call (get-favourite-plugin-menu-entries)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "get-favourite-plugin-menu-entries" has not been defined when parsing atom=========
FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (unbound-variable ("unbound variable ~S in ~S" get-favourite-plugin-menu-entries (popup-menu (get-favourite-plugin-menu-entries))))



error: unbound-variable unbound variable get-favourite-plugin-menu-entries in (popup-menu (get-favourite-plugin-menu-entries))

error-code: (popup-menu (get-favourite-plugin-menu-entries))

error-file/line: #f[673]

error-history: 

"(popup-menu (get-favourite-plugin-menu-entries))"

2:    
"conf"

7:    
"(apply func args)"
;init.scm[322] 
9:    
"(FROM-C-catch-all-errors-and-display-backtrace-automatically mylint-and-eval-string "(popup-menu (get-favourite-plugin-menu-entries))" (rootlet))"


    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
result: {catch-all-errors-and-display-backtrace-automatically-failed-value}-0
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :num-uses)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
result: get-favourite-plugin-menu-entries
radium> result: #<undefined>
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda ()>
. 
result: get-favourite-plugin-menu-entries
radium> result: #<undefined>
radium> result: #<undefined>
radium> (hash-table
  '(symbol "plugin_usage_Ladspa_-__-_C* AmpV - Tube amp") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Foldover distortion") "1"
  'plugin_usage_FluidSynth_-__-_FluidSynth "2"
  'plugin_usage_Pipe_-__-_Pipe "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-Q "3"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-F "2"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-D "1"
  'plugin_usage_VST_-_3BandEQ_-_3BandEQ "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-S "2"
  'plugin_usage_VST3_-_vitalium_-_Vitalium "1"
  '(symbol "plugin_usage_Ladspa_-__-_DJ EQ (mono)") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Pointer cast distortion") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA") "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-F "1"
  'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Reverb LADSPA") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Chebyshev distortion") "1"
  'plugin_usage_Ladspa_-__-_Disintegrator "1"
  '(symbol "plugin_usage_Sample Player_-__-_Sample Player") "401"
  '(symbol "plugin_usage_Ladspa_-__-_TAP Equalizer/BW") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-G "2"
  '(symbol "plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player") "122"
  'plugin_usage_Bus_-__-_Bus "57"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-T "1"
  'plugin_usage_Send_-__-_Send "1"
  'plugin_usage_VST_-_vitalium_-_vitalium "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-D "2"
  '(symbol "plugin_usage_Ladspa_-__-_Simple amplifier") "1"
  'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin "1"
  'plugin_usage_VST3_-_Uhbik_-_Runciter "7"
  '(symbol "plugin_usage_Faust Dev_-__-_Faust Dev") "15"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-P "1"
  'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono "1"
  'plugin_usage_VST_-_Uhbik.64_-_Runciter "8"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-A "3"
  'plugin_usage_Pd_-__-_NoteEvents "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-S "1"
  '(symbol "plugin_usage_Ladspa_-__-_Barry's Satan Maximiser") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Crossover distortion") "1"
  'plugin_usage_VST_-_compressor-stereo_-_compressor-stereo "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-A "12"
  '(symbol "plugin_usage_Ladspa_-__-_LS Filter") "1")result: #<unspecified>
radium> (hash-table
  '(symbol "plugin_usage_Ladspa_-__-_C* AmpV - Tube amp") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Foldover distortion") "1"
  'plugin_usage_FluidSynth_-__-_FluidSynth "2"
  'plugin_usage_Pipe_-__-_Pipe "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-Q "3"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-F "2"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-D "1"
  'plugin_usage_VST_-_3BandEQ_-_3BandEQ "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-S "2"
  'plugin_usage_VST3_-_vitalium_-_Vitalium "1"
  '(symbol "plugin_usage_Ladspa_-__-_DJ EQ (mono)") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Pointer cast distortion") "1"
  '(symbol "plugin_usage_Ladspa_-__-_GSM simulator") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Bass Enhancer LADSPA") "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-F "1"
  'plugin_usage_VST_-_spectrum-analyzer-x8_-_spectrum-analyzer-x8 "1"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Reverb LADSPA") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Chebyshev distortion") "1"
  'plugin_usage_Ladspa_-__-_Disintegrator "1"
  '(symbol "plugin_usage_Sample Player_-__-_Sample Player") "401"
  '(symbol "plugin_usage_Ladspa_-__-_TAP Equalizer/BW") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-G "2"
  '(symbol "plugin_usage_Sequencer audio file recorder/player_-__-_Sequencer audio file recorder/player") "122"
  'plugin_usage_Bus_-__-_Bus "57"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-T "1"
  'plugin_usage_Send_-__-_Send "1"
  'plugin_usage_VST_-_vitalium_-_vitalium "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-D "2"
  '(symbol "plugin_usage_Ladspa_-__-_Simple amplifier") "1"
  'plugin_usage_VST_-_JuceDemoPlugin_-_JuceDemoPlugin "1"
  'plugin_usage_VST3_-_Uhbik_-_Runciter "7"
  '(symbol "plugin_usage_Faust Dev_-__-_Faust Dev") "15"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-P "1"
  'plugin_usage_VST_-_art-delay-mono_-_art-delay-mono "1"
  'plugin_usage_VST_-_Uhbik.64_-_Runciter "8"
  '(symbol "plugin_usage_Ladspa_-__-_Calf Equalizer 8 Band LADSPA") "1"
  'plugin_usage_VST3_-_Uhbik_-_Uhbik-A "3"
  'plugin_usage_Pd_-__-_NoteEvents "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-S "1"
  '(symbol "plugin_usage_Ladspa_-__-_Barry's Satan Maximiser") "1"
  '(symbol "plugin_usage_Ladspa_-__-_Crossover distortion") "1"
  'plugin_usage_VST_-_compressor-stereo_-_compressor-stereo "1"
  'plugin_usage_VST_-_Uhbik.64_-_Uhbik-A "12"
  '(symbol "plugin_usage_Ladspa_-__-_LS Filter") "1")result: #<unspecified>
radium> Warning: Redefining *plugin-usage-prefix* plugin_usage_
. 
result: #<unspecified>
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback)>
. 
result: get-favourite-plugin-menu-entries
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f...(suppressing rest)... 
result: show-favourites-menu
radium> Warning: Redefining show-mixer-popup-menu-no-chip-under #<lambda (x y ...)>
. 
result: show-mixer-popup-menu-no-chip-under
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f...(suppressing rest)... 
Warning: Redefining show-favourites-menu #<lambda* (x y)>
. 
result: show-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback)>
. 
result: get-favourite-plugin-menu-entries
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :name)'. #f: #f...(suppressing rest)... 
Warning: Redefining show-favourites-menu #<lambda* (x y)>
. 
result: show-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
Warning: Redefining show-favourites-menu #<lambda* (x y)>
. 
result: show-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
Warning: Redefining show-favourites-menu #<lambda* (x y)>
. 
result: show-favourites-menu
radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> <Unable to contact Radium>

radium> Warning: Redefining insert-new-sound-object-in-mixer #<lambda* (x y)>
. 
result: insert-new-sound-object-in-mixer
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback)>
. 
result: get-favourite-plugin-menu-entries
radium> Warning: Redefining show-favourites-menu #<lambda* (x y ...)>
. 
result: show-favourites-menu
radium> result: insert-plugin-for-instrument-from-favourites-menu
radium> Warning: Redefining get-insert-plugin-entry #<lambda* (instrument-id enabled ...)>
. 
result: get-insert-plugin-entry
radium> Warning: Redefining insert-plugin-for-instrument-from-favourites-menu #<lambda* (instrument-id gui)>
. 
result: insert-plugin-for-instrument-from-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback shortcut-func)>
. 
result: get-favourite-plugin-menu-entries
radium> result: new-instrument-from-description
radium> Warning: Redefining show-favourites-menu #<lambda* (x y ...)>
. 
result: show-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback shortcut-func)>
. 
result: get-favourite-plugin-menu-entries
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "keybinding-string->string" in (keybinding-string->string). Arity:(1 . 1)=========
Warning: Redefining new-instrument-from-description #<lambda* (descr x ...)>
. 
result: new-instrument-from-description
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "keybinding-string->string" in (keybinding-string->string). Arity:(1 . 1)=========
Warning: Redefining new-instrument-from-description #<lambda* (descr x ...)>
. 
result: new-instrument-from-description
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "keybinding-string->string" in (keybinding-string->string). Arity:(1 . 1)=========
Warning: Redefining new-instrument-from-description #<lambda (descr)>
. 
result: new-instrument-from-description
radium> Warning: Redefining new-instrument-from-description #<lambda (descr)>
. 
result: new-instrument-from-description
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "assign-instrument-description-for-track" has not been defined when parsing atom in (show-favourites-menu :callback callback :shortcut-func assign-instrument-description-for-track)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "assign-instrument-description-for-track" has not been defined when parsing atom=========
Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> result: assign-instrument-description-for-track
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "kstring" has not been defined when parsing atom in (keybinding-string->string kstring)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "kstring" has not been defined when parsing atom=========
result: get-keybinding-string
radium> Warning: Redefining show-favourites-menu #<lambda* (x y ...)>
. 
result: show-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback shortcut-func)>
. 
result: get-favourite-plugin-menu-entries
radium> ******* Note from mylint: Higher order function call detected for expression: '(a :container-name)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(a :type-name)'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. #f: #f. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. #f: #f. 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback shortcut-func)>
. 
result: get-favourite-plugin-menu-entries
radium> Warning: Redefining insert-new-sound-object-in-mixer #<lambda* (x y)>
. 
result: insert-new-sound-object-in-mixer
radium> Warning: Redefining create-instrument #<lambda (type-name plugin-name)>
. 
result: create-instrument
radium> Warning: Redefining show-favourites-menu #<lambda* (x y ...)>
. 
result: show-favourites-menu
radium> Warning: Redefining get-keybinding-string #<lambda (string-or-kstring)>
. 
result: get-keybinding-string
radium> Warning: Redefining create-instrument #<lambda (type-name plugin-name)>
. 
result: create-instrument
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "assign-new-instrument-for-track" has not been defined when parsing atom in (show-favourites-menu :callback callback :shortcut-func assign-new-instrument-for-track)=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "assign-new-instrument-for-track" has not been defined when parsing atom=========
Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> result: assign-new-instrument-for-track
radium> ******* Note from mylint: Higher order function call detected for expression: '(kont descr)'. #f: #f 
result: insert-new-instrument-as-plugin
radium> Warning: Redefining insert-plugin-for-instrument-from-favourites-menu #<lambda* (instrument-id gui)>
. 
result: insert-plugin-for-instrument-from-favourites-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(kont descr)'. #f: #f 
Warning: Redefining insert-new-instrument-as-plugin #<lambda (type-name plugin-name)>
. 
result: insert-new-instrument-as-plugin
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining show-mixer-popup-menu-no-chip-under #<lambda (x y ...)>
. 
result: show-mixer-popup-menu-no-chip-under
radium> Warning: Redefining get-insert-plugin-entry #<lambda* (instrument-id enabled ...)>
. 
result: get-insert-plugin-entry
radium> ******* Note from mylint: Higher order function call detected for expression: '(add-func gui
          (lambda args
            (if (= deletion-generation (ra:get-audio-instrument-deletion-generation))
                (apply callback args)
                #t)))'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 24 
******* Note from mylint: Higher order function call detected for expression: '(strips-config :parent-gui)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 227...(suppressing rest)... 
******* Note from mylint: The function 'conf' has the value '(cdr entry)', which looks suspicious. Expression: '(conf :is-enabled)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 675. 
******* Note from mylint: The function 'conf' has the value '(cdr entry)', which looks suspicious. Expression: '(conf :is-enabled)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 675. 
******* Note from mylint: The function 'settings' has the value '(car rest)', which looks suspicious. Expression: '(settings :num-rows)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 675. 
******* Note from mylint: The function 'settings' has the value '(car rest)', which looks suspicious. Expression: '(settings :vert-ratio)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 675. 
******* Note from mylint: The function 'settings' has the value '(car rest)', which looks suspicious. Expression: '(settings :instrument-settings)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 675. 
*************** NOTE: schemecodeparser: "instrument-id" has already been defined locally. Old: (schemecodeparser-define-parameter-type). New: (instrument-id schemecodeparser-define-var-type instrument-id)/home/kjetil/radium/bin/scheme/mixer-strips.scm: 831....(suppressing rest).....
*************** WARNING! schemecodeparser: "delete" has already been defined globally. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 1016
*************** WARNING! schemecodeparser: "delete" has already been defined globally. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 1490
*************** WARNING! schemecodeparser: "delete" has already been defined globally. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 1592....(suppressing rest).....
******* Note from mylint: The function 'rubberband-resize' has the value '(gui-rubberband gui 5 "#bb111144"
                (lambda ()
                  (equal? (ra:get-current-instrument-under-mouse) instrument-id)))', which looks suspicious. Expression: '(rubberband-resize 0 0 width height)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 2522. 
******* Note from mylint: The function 'strips-config' has the value '(create-strips-config (list instrument-id) 1 *standalone-mixer-strip-ratio*
  (lambda x
    (remake (let (({last-arg}-8314 parent))
              (if (procedure? {last-arg}-8314)
                  (let (({gui}-8313 (ra:gui_width)))
                    (ra:gui_add-callback {gui}-8313 {last-arg}-8314)
                    {gui}-8313)
                  (ra:gui_width {last-arg}-8314)))
            (let (({last-arg}-8316 parent))
              (if (procedure? {last-arg}-8316)
                  (let (({gui}-8315 (ra:gui_height)))
                    (ra:gui_add-callback {gui}-8315 {last-arg}-8316)
                    {gui}-8315)
                  (ra:gui_height {last-arg}-8316)))))
  parent #t)', which looks suspicious. Expression: '(strips-config :scan-instruments!)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 2887. 
******* Note from mylint: The function 'strips-config' has the value '(create-strips-config (list instrument-id) 1 *standalone-mixer-strip-ratio*
  (lambda x
    (remake (let (({last-arg}-8314 parent))
              (if (procedure? {last-arg}-8314)
                  (let (({gui}-8313 (ra:gui_width)))
                    (ra:gui_add-callback {gui}-8313 {last-arg}-8314)
                    {gui}-8313)
                  (ra:gui_width {last-arg}-8314)))
            (let (({last-arg}-8316 parent))
              (if (procedure? {last-arg}-8316)
                  (let (({gui}-8315 (ra:gui_height)))
                    (ra:gui_add-callback {gui}-8315 {last-arg}-8316)
                    {gui}-8315)
                  (ra:gui_height {last-arg}-8316)))))
  parent #t)', which looks suspicious. Expression: '(strips-config :vert-ratio)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 2887. 
******* Note from mylint: The function 'strips-config' has the value '(create-strips-config instrument-ids num-rows vert-ratio remake gui)', which looks suspicious. Expression: '(strips-config :num-rows)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3245. 
******* Note from mylint: The function 'strips-config' has the value '(create-strips-config instrument-ids num-rows vert-ratio remake gui)', which looks suspicious. Expression: '(strips-config :recreate-config-gui-content)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3245. 
******* Note from mylint: The function 'strips-config' has the value '(create-strips-config instrument-ids num-rows vert-ratio remake gui)', which looks suspicious. Expression: '(strips-config :set-instrument-id-guis! (apply hash-table (flatten new-mixer-strips)))'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3245. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :num-rows)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3321. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :num-rows)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3328. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3343. 
******* Note from mylint: The function 'config' has the value '(object :strips-config)', which looks suspicious. Expression: '(config :is-enabled instrument-id)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3343. 
******* Note from mylint: The function 'config' has the value '(object :strips-config)', which looks suspicious. Expression: '(config :is-enabled instrument-id)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3343. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3352. 
******* Note from mylint: The function 'config' has the value '(object :strips-config)', which looks suspicious. Expression: '(config :show-config-gui)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3352. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :vert-ratio)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3363. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :vert-ratio)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3370. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :reset!)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3380. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :get)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3389. 
******* Note from mylint: The function 'object' has the value '(get-mixer-strips-object-from-gui mixer-strips-gui)', which looks suspicious. Expression: '(object :strips-config :set! configuration)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3394. 
******* Note from mylint: The function 'first-mixer-strips' has the value '(and (not (null? mixer-strips))
     (car mixer-strips))', which looks suspicious. Expression: '(first-mixer-strips :gui)'. /home/kjetil/radium/bin/scheme/mixer-strips.scm: 3444. 
result: #f
radium> ******* Note from mylint: Higher order function call detected for expression: '(func)'. /home/kjetil/radium/bin/scheme/instruments.scm: 97 
******* Note from mylint: Higher order function call detected for expression: '(func)'. /home/kjetil/radium/bin/scheme/instruments.scm: 97...(suppressing rest)... 
*************** NOTE: schemecodeparser: "i1" has already been defined locally. Old: (schemecodeparser-define-parameter-type). New: (i1 schemecodeparser-define-var-type i1)/home/kjetil/radium/bin/scheme/instruments.scm: 254....(suppressing rest).....
******* Note from mylint: The function 'no-inputs-or-outputs' has the value ''()', which looks suspicious. Expression: '(no-inputs-or-outputs :list)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'instruments' has the value ''()', which looks suspicious. Expression: '(instruments :list)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'instruments' has the value ''()', which looks suspicious. Expression: '(instruments :contains id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'no-inputs-or-outputs' has the value ''()', which looks suspicious. Expression: '(no-inputs-or-outputs :contains id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :separator-name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :preset-filename)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :num-uses)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1392. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1454. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1454. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1454. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2314. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2314. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2314. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2314. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis goal-instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2314. 
******* Note from mylint: The function 'data' has the value '(cl-car datas)', which looks suspicious. Expression: '(data :instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2314. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2330. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2330. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2330. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2346. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2346. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2346. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2384. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2422. 
result: #f
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "instr-conf" has not been defined when parsing atom in (pmg-start instr-conf (lambda (descr) (ra:create-audio-instrument-from-description descr)))=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "instr-conf" has not been defined when parsing atom=========
result: assign-instrument-for-track-from-plugin-manager
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining assign-instrument-for-track-from-plugin-manager #<lambda* (tracknum)>
. 
result: assign-instrument-for-track-from-plugin-manager
radium> Warning: Redefining assign-instrument-for-track-from-plugin-manager #<lambda* (tracknum)>
. 
result: assign-instrument-for-track-from-plugin-manager
radium> Warning: Redefining assign-instrument-for-track-from-plugin-manager #<lambda* (tracknum)>
. 
result: assign-instrument-for-track-from-plugin-manager
radium> result: assign-instrument-for-track-from-instrument/effect-menu
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : ":" has not been defined when parsing atom in (list "From instrument/effect-menu" : shortcut assign-instrument-for-track-from-instrument/effect-menu (lambda () (start-instrument-popup-menu instr-conf callback)))=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "shortcut" has not been defined when parsing atom in (list "From instrument/effect-menu" : shortcut assign-instrument-for-track-from-instrument/effect-menu (lambda () (start-instrument-popup-menu instr-conf callback)))=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : ":" has not been defined when parsing atom=========
WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : "shortcut" has not been defined when parsing atom=========
Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> result: assign-instrument-for-track-from-most-frequently-used-instruments
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> result: assign-instrument-for-track-from-preset
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining show-editor-track-popup-menu #<lambda (tracknum)>
. 
result: show-editor-track-popup-menu
radium> Warning: Redefining show-editor-track-popup-menu #<lambda (tracknum)>
. 
result: show-editor-track-popup-menu
radium> FROM-C-catch-all-errors-and-display-backtrace-automatically: func failed. Args:
    (radium-api ("<br>
Last API entry: gui_hide.<br>
Error: Gui #1139 has been closed and can not be used."))



error: radium-api 
Last API entry: gui_hide.
Error: Gui #1139 has been closed and can not be used.

error-code: (if (procedure? {last-arg}-27846) (let (({gui}-27845 (ra:gui_hide))) (ra:gui_add-callback {gui}-27845 {last-arg}-27846) {gui}-27845) (ra:gui_hide {last-arg}-27846))

error-file/line: #f[673]

error-history: 

"()"


({last-arg}-27846 . 1139) 

    SAFE_ADD_MESSAGE_WINDOW_TXT 1 
    SAFE_ADD_MESSAGE_WINDOW_TXT 2 
Warning: Redefining select-track-instrument #<lambda* (tracknum)>
. 
result: select-track-instrument
radium> Warning: Redefining select-track-instrument #<lambda* (tracknum)>
. 
result: select-track-instrument
radium> Warning: Redefining show-editor-track-popup-menu #<lambda (tracknum)>
. 
result: show-editor-track-popup-menu
radium> WARN called. force-throw:  #f . conf: hash-table: (hash-table :num-higher-order-notices 2 :num-overriding-local-variables-to-display 1 :num-overriding-global-variables-to-display 3 :assert-variable-errors #t :errorhandler #<lambda (tag . info)> :display-overriding display-overriding) 


========== READER Warning: : Wrong number of arguments for "spr-entries->menu-entries" in (spr-entries->menu-entries (ra:get-sound-plugin-registry) instrconf (lambda (entry) (spr-entry->instrument-description entry instrconf my-callback)) #f shortcut-func). Arity:(4 . 4)=========
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> *************** NOTE: schemecodeparser: "entries" has already been defined locally. Old: (schemecodeparser-define-parameter-type). New: (entries schemecodeparser-define-var-type (to-list entries))#f: #f....(suppressing rest).....
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(callback entry)'. #f: #f 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :separator-name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(level-down-func (cdr entries))'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :preset-filename)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :num-uses)'. #f: #f. 
Warning: Redefining spr-entries->menu-entries #<lambda* (entries instrconf ...)>
. 
result: spr-entries->menu-entries
radium> 'gui.scm already provided 
'keybindings.scm already provided 
Warning: Redefining get-instrument-volume-on/off-effect-name #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *bus-effect-names* ("System Reverb" "System Chorus" "System Aux 1" "System Aux 2" "System Aux 3")
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining mixer-normalized-to-slider #<lambda (mixer-normalized)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining radium-normalized-to-mixer-normalized #<lambda (radium-normalized)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining radium-normalized-to-slider #<lambda (radium-normalized)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining radium-normalized-to-db #<lambda (radium-normalized)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining mixer-normalized-to-db #<lambda (mixer-normalized)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining db-to-mixer-normalized #<lambda (db)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining db-to-radium-normalized #<lambda (db)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining db-to-slider #<lambda (db)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining slider-to-mixer-normalized #<lambda (slider)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining slider-to-db #<lambda (slider)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining db-to-text #<lambda (db add-dB-string)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-name-text-color #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-name-background-color #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *instrument-memoized-generation* 0
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining run-instrument-data-memoized #<lambda (func)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining define-instrument-memoized #<macro (name&arg . body)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining create-audio-connection-change #<lambda* (type source ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining push-audio-connection-change! #<macro (changes rest)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining for-all-tracks #<lambda (func)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-all-midi-instruments #<lambda {args}-40026>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-all-audio-instruments #<lambda {args}-40031>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-from-name #<lambda {args}-40036>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining is-legal-audio-instrument? #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining sort-instruments-by-mixer-position #<lambda {args}-40041>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining instrument-eventually-connects-to #<lambda {args}-40046>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining sort-instruments-by-mixer-position-and-connections #<lambda {args}-40051>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-pure-buses #<lambda {args}-40056>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-bus-effect-name-from-target-instrument #<lambda {args}-40061>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-buses #<lambda {args}-40066>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instruments-connecting-to-instrument #<lambda {args}-40071>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instruments-connecting-from-instrument #<lambda {args}-40076>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instruments-econnecting-to-instrument #<lambda {args}-40081>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instruments-econnecting-from-instrument #<lambda {args}-40086>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-all-instruments-with-no-input-connections #<lambda {args}-40091>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-all-instruments-with-at-least-two-input-connections #<lambda {args}-40096>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining is-connected-somehow? #<lambda {args}-40101>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-all-instruments-that-we-might-send-to #<lambda {args}-40106>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-next-plugin-instrument-in-path #<lambda {args}-40111>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-meter-instrument-id #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-all-plugins-used-in-mixer-strip #<lambda {args}-40116>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-all-nonbus-plugins-used-in-mixer-strip #<lambda {args}-40121>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-returned-plugin-buses #<lambda {args}-40126>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining new_instance_of_get-cat-instruments #<lambda {args}-40131>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining move-connections-to-new-instrument #<lambda (id-old-instrument id-new-instrument)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining replace-instrument-in-mixer #<lambda (id-old-instrument id-new-instrument)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining async-replace-instrument #<lambda* (id-old-instrument description ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining replace-instrument #<lambda* (instrument-id must-have-inputs ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining create-load-instrument-preset-description #<lambda (filename)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining request-select-instrument-preset #<lambda (parentgui instrument-id ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining new-instrument-from-preset #<lambda* (parentgui x ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining new-instrument-from-plugin-manager #<lambda* (parentgui x ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining new-instrument-from-spr-entry #<lambda (type-name plugin-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining async-load-instrument-preset #<lambda (id-instrument instrument-description ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining load-prev/next-instrument-preset #<lambda (is-prev instrument-id ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-load-prev-instrument-preset #<lambda* (instrument-id parentgui)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-load-next-instrument-preset #<lambda* (instrument-id parentgui)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-load-prev-instrument-preset-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-load-next-instrument-preset-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-load-instrument-preset-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-replace-instrument-preset-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-show-hide-instrument-gui-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-reset-instrument-a/b-popup-menu #<lambda (abnum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-select-instrument-a/b-popup-menu #<lambda (abnum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-new-instrument-between #<lambda (instrument-before-id instrument-after-id ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-remove-instrument-from-connection-path #<lambda (parent-instrument-id instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-set-solo-for-instruments #<lambda (instruments doit)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-switch-solo-for-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-set-mute-for-instruments #<lambda (instruments doit)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-switch-mute-for-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-set-bypass-for-instruments #<lambda (instruments doit)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-switch-bypass-for-selected-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-display-mute-status-in-statusbar #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-display-solo-status-in-statusbar #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-display-bypass-status-in-statusbar #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining set-random-sample-for-all-selected-sampler-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM-C-generate-new-color-for-all-selected-instruments #<lambda (mix-background)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining make-instrument-conf #<lambda* (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining same-instrconf-with-regards-to-filtering? #<lambda (instrconf1 instrconf2)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining spr-entry->instrument-description #<lambda (entry instrconf ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining can-spr-entry-be-used? #<lambda (entry instrconf)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining spr-entries->menu-entries #<lambda* (entries instrconf ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *popup-menu-args-cache-instrconf* #f
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *popup-menu-args-cache-generation* -1
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *popup-menu-args-cache-args* #f
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *popup-menu-curr-callback* #f
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining *plugin-usage-prefix* plugin_usage_
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-favourite-plugin-menu-entries #<lambda (callback shortcut-func)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining create-instrument #<lambda (type-name plugin-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining show-favourites-menu #<lambda* (x y ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-request-rename-instrument #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining is-connected-to-main-pipe #<lambda (id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining is-directly-connected-to-main-pipe #<lambda (id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining switch-connect-instrument-to-main-pipe #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-sample-player-mixer-popup-menu-entries #<lambda (instruments)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-random_sample-button-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-plugin-for-instrument-from-popup-menu #<lambda* (instrument-id gui)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-new-plugin #<lambda (type-name plugin-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-plugin-for-instrument-from-favourites-menu #<lambda* (instrument-id gui)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-plugin-for-instrument-from-plugin-manager #<lambda* (instrument-id gui)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-plugin-for-instrument-from-preset-file #<lambda* (instrument-id gui)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining request-send-instrument #<lambda (instrument-id callback)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining insert-send-for-instrument #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining switch-force-as-current-instrument #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-forced-as-current-instrument-menu-entry #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-insert-plugin-entry #<lambda* (instrument-id enabled ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-popup-entries #<lambda* (instrument-id parentgui ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining start-instrument-popup-menu #<lambda* (instrconf callback ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining create-instrument-from-description #<lambda (instrconf description)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining create-instrument-popup-menu #<lambda (instrconf)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-midi-learn-menu-elements #<lambda (instrument-id effect-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining create-select-modulator-popup-menu #<lambda (callback)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining edit-instrument-effect #<lambda (effect-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-effect-popup-entries #<lambda* (instrument-id effect-name ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-show-effect-popup-menu #<lambda (instrument-id effect-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining show-set-current-instrument-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining delete-all-unused-MIDI-instruments #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-modular-mixer-coordinate-relation-to #<lambda (goal-instrument-id better?)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-mixer-strips-coordinate-relation-to #<lambda (goal-instrument-id better?)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-mixer-strips-to-the-up-of #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-mixer-strips-to-the-down-of #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-mixer-strips-to-the-left-of #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-mixer-strips-to-the-right-of #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-modular-mixer-to-the-left-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-modular-mixer-to-the-right-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-modular-mixer-to-the-up-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-in-modular-mixer-to-the-down-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-to-the-X-of #<lambda* (modular-func strips-func ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-to-the-left-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-to-the-right-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-to-the-up-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining find-instrument-to-the-down-of #<lambda* (goal-instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-move-current-instrument-left #<lambda (move-current move-current-under-mouse)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-move-current-instrument-right #<lambda (move-current move-current-under-mouse)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-move-current-instrument-up #<lambda (move-current move-current-under-mouse)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-move-current-instrument-down #<lambda (move-current move-current-under-mouse)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-instrument-for-track #<lambda* (tracknum get-instrument ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-sampler-for-track #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-MIDI-instrument-for-track #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-new-instrument-for-track #<lambda (type-name plugin-name)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-instrument-for-track-from-plugin-manager #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-instrument-for-track-from-instrument/effect-menu #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-instrument-for-track-from-most-frequently-used-instruments #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining assign-instrument-for-track-from-preset #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining select-track-instrument #<lambda* (tracknum)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining show/hide-instrument-gui #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining reset-pan! #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining pan-enabled? #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining pan-enable! #<lambda (instrument-id onoff)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-background-color #<lambda (gui instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining get-instrument-border-color #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining paint-instrument-background-color #<lambda (gui x1 ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining draw-mutesolo #<lambda* (gui type ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining paint-horizontal-instrument-slider #<lambda (widget instrument-id ...)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-select-prev-instrument-program-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-select-next-instrument-program-popup-menu #<lambda ()>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-select-prev-instrument-program #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-select-next-instrument-program #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-pitch_type_button-pressed #<lambda* (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
Warning: Redefining FROM_C-convert-pipe-to-bus #<lambda (instrument-id)>
 while loading /home/kjetil/radium/bin/scheme/instruments.scm 
******* Note from mylint: Higher order function call detected for expression: '(func)'. /home/kjetil/radium/bin/scheme/instruments.scm: 97 
******* Note from mylint: Higher order function call detected for expression: '(func)'. /home/kjetil/radium/bin/scheme/instruments.scm: 97...(suppressing rest)... 
*************** NOTE: schemecodeparser: "i1" has already been defined locally. Old: (schemecodeparser-define-parameter-type). New: (i1 schemecodeparser-define-var-type i1)/home/kjetil/radium/bin/scheme/instruments.scm: 254....(suppressing rest).....
******* Note from mylint: The function 'no-inputs-or-outputs' has the value ''()', which looks suspicious. Expression: '(no-inputs-or-outputs :list)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'instruments' has the value ''()', which looks suspicious. Expression: '(instruments :list)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'instruments' has the value ''()', which looks suspicious. Expression: '(instruments :contains id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'no-inputs-or-outputs' has the value ''()', which looks suspicious. Expression: '(no-inputs-or-outputs :contains id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 576. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :separator-name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :preset-filename)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :num-uses)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1396. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 0)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1458. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 1)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1458. 
******* Note from mylint: The function 'strings' has the value '(string-split typeandname "_-_")', which looks suspicious. Expression: '(strings 2)'. /home/kjetil/radium/bin/scheme/instruments.scm: 1458. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2325. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2325. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2325. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2325. 
******* Note from mylint: The function 'instrument-guis' has the value '(apply hash-table
       (flatten
        (map (lambda (s) (list (s :instrument-id) (s :gui-id))) instrument-settings)))', which looks suspicious. Expression: '(instrument-guis goal-instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2325. 
******* Note from mylint: The function 'data' has the value '(cl-car datas)', which looks suspicious. Expression: '(data :instrument-id)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2325. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2341. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2341. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2341. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2357. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2357. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2357. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2395. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'best-box' has the value '(and best-data (best-data :box))', which looks suspicious. Expression: '(best-box :x)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
******* Note from mylint: The function 'box2' has the value '(data :box)', which looks suspicious. Expression: '(box2 :y)'. /home/kjetil/radium/bin/scheme/instruments.scm: 2433. 
result: FROM_C-convert-pipe-to-bus
radium> Warning: Redefining get-select-track-instrument-popup-entries #<lambda (tracknum)>
. 
result: get-select-track-instrument-popup-entries
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining *popup-menu-curr-callback* (hash-table)
. 
result: #<unspecified>
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining *popup-menu-curr-callback* #(#f #f)
. 
result: #<unspecified>
radium> result: #(#f #f)
radium> result: 0
radium> result: 1
radium> result: #(0 1)
radium> Warning: Redefining *popup-menu-args-cache-args* #(#f #f)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-generation* #(-1 -1)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-args* #(#f #f)
. 
result: #<unspecified>
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining *popup-menu-args-cache-instrconf* #(#f #f)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-generation* #(-1 -1)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-args* #(#f #f)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-preset-in-clipboard* #(#f #f)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-curr-callback* #f
. 
result: #<unspecified>
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f...(suppressing rest)... 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> result: #f
radium> result: #t
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f...(suppressing rest)... 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f...(suppressing rest)... 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f...(suppressing rest)... 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f...(suppressing rest)... 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f...(suppressing rest)... 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> result: gakkgakk
radium> hello1 
result: #\newline
radium> Warning: Redefining start-instrument-popup-menu #<lambda* (instrconf callback ...)>
. 
result: start-instrument-popup-menu
radium> ******* Note from mylint: Higher order function call detected for expression: '(instrconf :parentgui)'. #f: #f 
Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> *************** NOTE: schemecodeparser: "entries" has already been defined locally. Old: (schemecodeparser-define-parameter-type). New: (entries schemecodeparser-define-var-type (to-list entries))#f: #f....(suppressing rest).....
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(callback entry)'. #f: #f 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :separator-name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: Higher order function call detected for expression: '(level-down-func (cdr entries))'. #f: #f...(suppressing rest)... 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :preset-filename)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :type-name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :name)'. #f: #f. 
******* Note from mylint: The function 'entry' has the value '(car entries)', which looks suspicious. Expression: '(entry :num-uses)'. #f: #f. 
Warning: Redefining spr-entries->menu-entries #<lambda* (entries instrconf ...)>
. 
result: spr-entries->menu-entries
radium> Warning: Redefining *popup-menu-args-cache-generation* #(-1 -1)
. 
result: #<unspecified>
radium> Warning: Redefining insert-plugin-for-instrument-from-popup-menu #<lambda* (instrument-id gui)>
. 
result: insert-plugin-for-instrument-from-popup-menu
radium> result: #t
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining *popup-menu-args-cache-generation* #(-1 -1)
. 
result: #<unspecified>
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining get-instrument-popup-menu-args #<lambda* (instrconf callback ...)>
. 
result: get-instrument-popup-menu-args
radium> Warning: Redefining *popup-menu-args-cache-instrconf* #(#f #f #f)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-generation* #(-1 -1 -1)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-args* #(#f #f #f)
. 
result: #<unspecified>
radium> Warning: Redefining *popup-menu-args-cache-preset-in-clipboard* #(#f #f #f)
. 
result: #<unspecified>
radium> 